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ば 燃え つき て し まう の だ 。 ザ ク と の 死闘 は つづ く 。 . 制作 ・ 発 売 元 > 


も つの メー パー タイ ム だ カン ダム 人 は が ウィ ドキ ペ ー 
0 2200202 ラボ ー チ 7 式 妊 


〒|60 東京 都 新 宿 区 新宿 2| | ラポート ビア ビル TE L :03(354) 3951 


/ 2 
22 た 


'@ ぅ 


ポシェ ッ ト に は 

ご ん な に カラ フル で 楽し そう な 
ゲー ム が 

いっ ぱい 載っ て いま す / 


HHHHH ロ ロロ 
ロ ロ 


| ロロ 
HHHHHHHH 
HHHH 


H 反 イ ニー< 3 
上 回 了 疫 四 
_ ロ nnnnnnnnnnn | ロ 
| 屋 nnnnnn nn ロロ IN 』 コ ーー 


ロレ ーー ロ 
HHHHHHHHHH ロ HHHHHHHHH ロ ロミ 、 

e@@@@ 6 人 A 刺 頂 の 食 人 植物 う 
ーー ご めで で 大 ちず の 森 
の 夜 。 プ ラッ クサ フ 
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^ ソ F ド トル が に ーー に ゲー ム な の ey こ 
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ROCK CRASH に 呈 。 画 画 男 ロロ 画 男 男 男 還 還 
モグ ラ タ タ キ 還 拓 画 画 画 面 男 男 男 ロロ 男 男 四 男 画 
DOWN 回 括 加 和男 画 困 男 四 男 男 還 日 還 男 還 り の 


7 な ら ベ KC 画 、 画 男 男 還 男 四 還 還 四 男 国 / 

バク バク マン KOK 画 、 画 男 男 画 還 上 還 男 男 還 男 
JSMEEPER 肖 還 自 画 中 画 | 画 画 画 (本: 画 画 本 本 
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4 新 魚 ゲー op プロ グラ ムリ ワリ スト 集 … 一 ーーー に ドン OTTO ちら 
田 ロ グラ ハム ハオ シェ エ ソ ツ ト 『 了 RY か ひ の 
今月 の お て まみ ププ レイ バッ ツク ・ チ エッ ク ポ イン トノ 今月 の ブラ ムン お 便り & プ ログ ラム 募集 

時 バ ツク ナン / バー の お 知ら せ 0 すり /////) 較 ア ン ケ ー ト 09 7 の 0 の 
注 ※ X1turbo の BASIC(SHARP Hu-BASIC CZ-8FB02) で 、 こ の 本 の NSOLE0.25 と 打ち こむ 。 そ うし て か ら 、 プ ログ ラム を 打ち こん で いく こ 
Xt の プロ ダラ ム を 入力 し 、 走ら せる と き は の よう に し て くだ さい ど 。 


BASIC を 立ち 上 げ る と 自動 的 に “Start up.Bas” が 読み こま れ ま す が 、 
この と き HELP キ ー を 押し つづ け て いる と 、“NEWON” と 表示 され る の で 注 ※※ PB- 100 プ 110 十 0R-1 ま た は PB-200/300/400/410、FX- 
リタ ー ン キー を 押し ます 。 そ し て KMODE0:KLIST0:WIDTH 80,25:CO 700P グ 710P グ 720P グ 802P 


画面 プロ グラ 
。 短 か い けれ ど 


友 み る よう 2 で 婦 い (よう か 、 ロ マン チッ ク 六 記 ゲーム 
ほじ - ぐず 


星 層 の ステ ーション 
FOR PC-BOO1mkII/ 
88U1,mkIIN-BASC 


⑬⑱ ド ッ キ ング に 失敗 し た ら ボ カ ァ ン .// 
プロ グラ ム を 打ち こむ と 、 キ ミ は 突 


pY 万 本 溢 然 字 宙 清 会 社 の アル バイ ト に 変身 。 
2 が TREE 5 に 乗っ 
1 う 員 に ポコ 出 に 散ら ば る 是 層 を 拾 + い あつ め る 
8 た さ 連 ぼ ぐ ※ け / 夢 な 、 な いよ う 7 
ぼれ れ く ショ co 2 
| は し れ ま ッ ツ ・ Mo 不思議 な 仕事 の 
1 お 衣 ト 8 
2 と / を まそ ( 
キー 連 『 
納 食 ま 親 の の 『 
ラベ で 成 。 の 6 
こ し が た 了 縛 の ろ 変 m 
| た 大 そ 納 表 ` な 』 
lm す 習 す 好 の 有 長 で お ハ 引 
まま チ ン 今 日 そ き と を は 導 』 
m ま は そ も は が れ に き 知 甘 あ 務 k 
maC し は し 好 マ 流 か な か ら 納 ち 員 
ョ s ン く て きま イ れ ら り ら な 豆 や で 
Nhk 。。 |  /.、 
_、、、。、。、。。、、、 、。。。。 ィ 


16 WIDTH46 ,25:CONSOLE9 , 25, 9,1:DEFINTA-Z 
2 S=9:M=9:PRINTCHR も (12) 

39 T=9:X=2:Y=12:E=1 :K=37:W=190:M=M+2 
49 LINE(8,1 )-(38,24),"X" 、4.B:FORA=1T05 
59 R=RND(1)x21+9:Q=RND( 1 )x20+3: IFPEEK(8HF392+Qx12+Rr+R) >32THEN5g 
69 LOCATER,Q:COLORRMOD7+1:C=QMOD4+228:PRINTCHR$(C) :NEXT 

79 LOCATE4,6:COLOR5 :PRINTUSING"SCORE 拉 持 " 1S 

89 LOCATE22.9:PRINTUSING"Hi-SCORE 提 拉 "iH 

99 L=RND(1)x18+3:LINE(K,L)-(K,L+2) ,"@" ,3 

199 FORA=1TO34:I=INP(9):F=( =253)x(Y<23)-(T=239 )x(Y>2) 

119 LOCATEX,Y:PRINT" ":X=X+E:Y=Y+E 

129 P=PEEK(8HF392+Yx129+X+X):IFP>32THENGOSUB168 

139 LOCATEX,Y:COLOR6 :PRINTCHR$(61+E) :NEXT 

149 P=PEEK(8HF392+Yx129+X+X+E+E) : IFP く 33THEN216 

159 LINE(K,L)-(K,L+3)," ":K=38-K:E=-E:W=W-16:GOTO99 

169 IFP=135THEN216 

179 BEEP1 :T=T+1:S=S+W:BEEP9: IFT=5THEN199 

189 LOCATE19.9:COLOR5 :PRINTUSING" 提 "5S:RETURN 

199 PRINTCHR$(12):FORA=1TOM:R=RND(1 )x23+8:Q=RND( 1 )x29+3 

299 LOCATER,Q:COLORRND( 1 )x7+1:PRINT" 置 ":NEXT :GOTO38 

219 FORA=1TO199:BEEP1 : BEEP9 :NEXT 

229 LOCATE11,11:COLOR7:PRINTTYGAME OVER":IFS>HTHENH=S 
239 LOCATE19,14:PRINT"P U S H【CLR] K E Y":WAIT8,1,255:GOTO29 


改造 し だ り 、 


ログ ラム 特集 


アイ デア は 濾 縮 され て いる か ら 、 移 植 し た り 
ワイ ド に 楽し め る ぞ 。 


st ど 0 ひ C 連 日田 


穫 妨 せ は へら 打 。 


4| (アッ プ ) と IL (ダウ ン ) の キー 
で 、 キ ミ の 宇宙 艇 >? また は “ぐり?) 
を 操作 し ます 。 ま た 宇宙 艇 は 自動 的 に 
推進 し て いる の で キミ は 高度 を あわせ 
る だ け で いい 。 小 惑星 (|]) に は ぶつ 
か ら な いよ うに 、 三 角形 の 星 居 どけ を 
拾っ て いこ う 。 

画面 の 両端 に きた ら 、 宇 宙 ス テー シ 
ョ ン ( 〇 ) と ドッ キン グ し て 逆 方 向 へ 発 
ドッ キン グ に 失敗 し た に bomb 2 
号 っ 


進 。 
是 層 は 100 点 か ら だ ん だ ん 点 ヵ 
て いく の て 和 早め に 拾う べし 。 


お つと 。、 リ フン シン イ は COLR キ ーー だ) 


玉 変 数 リス ト 


E,F…… 自 機 の 移動 の 際 の 増分 

し Ko 宇宙 ステ ーション の 座 
標 

RRO…… 星 肩 と 小惑星 の 座標 

C…… 星 層 の キヤ ラク タイ 


ーー 山田 改 は の @@SHRHTA 


一 プ ログ ラム ハ の 説明 

10~- 30 初期 設定 

40~- 80 画面 作成 

90 字 宙 ステ ーション 表 
志 
キー 入力 
自 機 の 移動 

ドッ キン グ 、 自 機 亡 
向 転 損 
小惑星 に あ た だ つ だ か 
得点 処理 、 面 リア 
か ガ 
190-200 小惑星 表示 
210ー230 ゲー ハム オー バー 
一 チェ ツク フ ボ イント 
この ゲー ム で は 自 機 が 枠 に あ 
だ つて も 、 失 敗 に な ら な いん だ 
けど 、 そ うし だ た だ い 人 は 100 行 の 
CO の あと の 、2 の つめ 
こと 4 つめ の カツ コ の 中 を それ ぞ 
れれ YY で 24)、 (YY ジ タイ) みえ 
て 、160 行 を IF P=135 
OR P ロ = テグ ク 4 の 9 THEN2 
1 の に し て ちよ ょ よー だ い 。 
メー リ 


100 
110-130 
140 一 150 


160 
170 一 160 


テッ 
昌三 


く ゆ みち ゃ ん トマ ト > い き な り の 新 コ ー ナ ー で す 。 ご ご こ 


で は 、 言 葉 を 使 つ て いろ ん な お も し ろ さ を みん な で 追求 し て いき だ いな 。 
投稿 待つ て る よ ! (詳し く は ログ ラム オシ ョ ッ ト を 見 て ね ) まず 、 第 1 回 は 本 (や ) を 見 せ ち ゃ う ね 。 


入ら 6 すず の 森 へ プラ ッ ク サ ファ " 求 め て と 少 と 光 禁 交 


9 REM 1 が ん GAME Nol "NIGHT" 

1 CONSOLE9 , 25,9,1:WIDTH49 ,25:H=599:S=9:M=29:N=5:T2=29 

2 CMDVIEW(8,16)-(319.199):X=37:Y=3:F=9:CMDCLS3 

3 CMDSCREEN2, ,9:CMDLINE(8,16)-(319,199),3,BF 

4 LINE(9,1)-(38.1), "で",2:LINE(0,2)-(38.24) "まる" 9,B:COLOR7 
5 LOCATE1 ,9:PRINT "HIGH "HiSPC(3)j"TIMETISPC(7)) "SCORE"1S 
6 FORI=1TOM:LOCATERND( 1 )x37+1 ,RND(1)*2113:COLOR9:PRINT" ま "1:NEXT 
7 FORI=1TON:LOCATERND(1)*37+1.RND(1)x21+3:COLOR6:PRINT" 人 の 5 に NEXT 
8 LOCATERND(1)x37+1,RND(1)x*21+3:COLOR9:PRINT"$ "5:BEEP 

9 FORT=1TO299:LOCATE19.9:PRINTUSING" 拉 "?T: 1=INP(9 ) 

19 LOCATEX,Y:PRINT" "1:X=X+( 1=253)-( =247) :Y=Y+(T=223)-(=251 ) 
11 P=PEEK(&HF392+Xx2+Yx120):IFP=235THEN16 

12 IFP=232THENF=1:T1=T+T2ELSEIFP=234THEN26 

13 COLOR5:LOCATEX,Y:PRINT"\"::IFF=9THEN15ELSECMDSCREEN, , 7 :CMDSCREEN, ,9 
14 IFT=TITHEN F=9 

15 NEXTT 

16 FORI=TO7:CMDSCREEN, , IMOD4 : WIDTH46:BEEP1 :FORJ=9T039 :NEXTJ:BEEP9:NEXTI 
17 LOCATE15,13:COLOR7:PRINT"GAME OVER":IFH<STHENH=S5・ 

18 COLOR2:LOCATE 11.15:PRINT "HIT ERETURN] KEY" 

19 IFINKEY$=CHR も (13)THENS=09:M=20:T2=29:GOTO2ELSE19 

2 FORI=1TO49:BEEP1 :FORJ=1TOi+25:NEXTJ:BEEP6 :NEXTI 

21 M=Mx1 .4:N=Nx.96:S=S+209-T:T2=T2x.95:LOCATE39,9:PRINTSi :GOTO2 


つ 有 瞬間 記憶 術 の 訓練 に な り そ う ./ ーー 瞬 、 あ た り が 明る く な る の だ ( ほ 真 


N80-BASIC 
BY プー さん 


7 
7877 


FOUR PC-80U1mkII 


一 変数 リス ト 


F…… 人 を 取 つ た と き に だ た つ フ 
ラ ゲ 


… 男 面 を 反転 させ る 
と き に 使用 


P……V-RAM PEEK 用 
弄 プ ロブ ラム の 説明 


20 30 

40 一 90 
100 
110 一 160 
170-200 
210 一 220 


初期 設定 

画面 作成 
タイ ム 表 示 

\ の 秘 動 と 判断 
ゲー ム オ ー バ ルー 地理 
面 の リア 処理 


マ \ こ とこ ゐ し が ガ 見 えな い 暗 間 。 
る ゐ を 取る と 一 脚 、 昼 の よう に 


捕 格 2 o げ げ つ 下 に 更 ガ い る / 


7GH  S98 4。| コ 


= ら SCORE @ 


そり ゃ まあ 、 1 画面 で すか ら ね 、 画 
面 は シン プル な の が 多い で す よ 。 で も 、 
ら この シップ フル さか が か えっ て 島 か な み イ 
メー ジ を ふく ら ま せ て くれ る と いう フ 
アァ ン も 多い ん よ 。 

『NIGHT』 は 、 作 者 の 設定 が な く て 
も いろ ん な イメ ー ジ の ふく らむ アイ デ 
アゲ ー ム が だ 。 

キミ が 動か す の は `\/。[1I3I2I5] キ 
ー で 、 暗 黒 へ と 進ん で い 〈。 光 っ て 見 
える “@” は 、 発 光 弾 。 こ れ を 取る と 


封筒 に 感動 し た 14 歳 の プー さん 


も う パ コ ち ゃ ん の 封筒 (テク ポリ 専用 
の 封筒 ) を 目 に し た と き は 、 体 か ら 熱い 
も の が こみ あげ て くる よう な 感動 を 受け 
まし た 。 そし て 、 思 わ チ ニ レー。 
タッ と ほほ えん で 5 
し まい まし た 。 初 
め て 送っ た の が 載 


| BI BI HI  』 上 I IM 』 ノコ 


は 変わ る けど 、Mr.P 
C ほ し いよ ー/ 
で も 私 は PC-8001m 
kT を 愛し て る 。 


ト 。 肖 朋 8 月 月 朋 上 上 8 上 8 BR 8 8  I 


OO OO 9 8 8 8% 8 8 8 2 


参照 )。 
よく 見 る と 、 暗 黒 の な か に 2 種類 の 
キャ ラク タ が 隠れ て いる 。 だ た くさ ん の 
* 貞 と だ っ だ ひと つの 金 "。 更 は 食 
人 植物 で 、 こ いつ に あたる と 予想 ど お 
り 食わ れ て 死ぬ 。 そ う 思 うと 、 こ の 暗 
半 の 恐 し きる き が わか っ 
て (る だ ろう 。 そ し 
て 、@$ は 高価 な プラ 詩 まき ee 
ッ グ サン アデ イア 。 と 
れ を 取る の が キミ の 
目的 だ 。 
発光 弾 を 取っ た と 
き ( に 時 見 える この 
画面 を 頭 に 焼き つけ 
て 、 食 人 植物 れ よ け 
が が しら フタ ッ グ サブ 
ァ イ ヤ を 目指 せ 。 


テッ ビ 
表面 9 


< ゆみ ちゃ ん トマ ト > 逆 ぶさ 言葉 プ そ の 1 「 だ け や ぶ や け だ 」( 竹 や ぷ 焼 け を な) これ は みん な も よ ぐ 知 つ て る よね 。 上 か がら 読ん で も 
下 か ら 読ん で も 同じ に な る つて いう 言葉 。 こ れ は お か し か ら あ る も の だ けど 、 次 で ゆみ の 新作 を 発表 し ます 。 


\/008- ワ g 募 韻 ? と の ロ と 屋 大 7 @ 


だ だ 兄 て る だ び げ で 8 楽し い サ ン ン ツレ フロ グラ ム 刀 き / 


ミラ クル CLS ら 


一 メモ リマ ッ プ 
E560<E58B_POLL の ジャ ン 
プ 先 設定 
E950(2YEDBZ メイ ラン ルー チ 
ジン 
E5B3<E5C5 乱数 を 作り A 
レジ スマ に 入 
れる 
E5C6-E5DC 画面 の 消し 亡 
を 決め る 
E5DD<E5F6 画面 を 消す 
E5F/ -E5F8 乱数 作成 用 ワ 
2 モリ リア 


SON 


] FOR PC-8801.mkII 
IN88-BASIC 
| BY だ ラブ ン 


19 CLEAR ,&HE57F 

20 FOR I=9 TO 7:READ D$:SUM=9:FOR J=9 TO 15 
39 D=VAL("&H"+MID$(D$,Jx2+1,2) ) : SUM=SUM+D 

49 POKE 8&HE58+Ix16+J,D:NEXT:READ D$ 

59 IF SUMK>VAL("&H"+D$) THEN PRINT "Error in":i189+Ix19:STOP 
69 NEXT:DEF USR=&HE589:A=USR(9 ) 

199 DATA 3EC3218CE532A7EE22A8EEC9E5F3DB79, 9FE 
119 DATA F53EE5D3793A1FF99F479F32E489CB98,892 
129 DATA 9F32E889CB989F32EC86CDC688F1D379,998 
139 DATA FBE1C92AF7895D5419191181991922F7,6ED 
149 DATA 89ED5F8485C9CDB38847CDB3894FC5CD, 9C6 
159 DATA B38947CDB389F6914FE11199497CF6C9,824 
169 DATA 67D35C3699D35D3699D35E3699D35F99,5D4 
176 DATA 1B7AB3C2DD89C9999999999999999999,43 


ト | BR 当 四 8 = 虹 昌 見 】 
先 に 答え を 言っ ち 
ゃ う 。 全部 正解 。 


本 る は 、 ここ に も 
RAGON の 衝撃 の 告 
白 が 載る は ず だ っ た 
ん だ けど 、 あ れ っ 
きり 編集 室 に 姿 を 
見 せな い の で す 。 

DRAGON を 知ら な い 
多く の 読者 の た め に クイ ズ JDRAGON は 、 
(① 顔 は ドラ ゴン そっ くり ② 男 ③ 大 学 
1 年 生 (4 英語 に 弱い ⑤ い つの ま に か 
消え る 性 質 が ある の うち どれ で し ょ う 。 


に 


ト ov Wo 上 まき R 胃 月 8 | 
昌 8 8 


マミ ラク フル OL S の 無数 の パタ ー ン の う 
ち 1 つ を コマ 落と し 。 左 か ら 右 へ 、 サ ー 
ツ と CLS し ます 。 ホ ント は も つと だ く 
さん の パタ ー ン を な ら べ だ いん だ 
けど 、 ま 、 あと は 実物 を 見 て ね 。 


72E リ に 
表側 9 


サン フル ノワ うん 


19 CONSOLE 9、25.9.1:CLS 3 

29 CLEAR ,&HE57F 

39 C=INT(RND(1)x8):IF C=D OR C=8 THEN 3 
49 D=C:COLOR ,C,INT(RND(1)x8):POLL:GOTO 38 


@@ う 一 む 、 さ す が DRAGON は し ぶ い / 

こ % は ゲ が 一 の の デア ログ タム て は あり 
ませ ぜん 。 いわ ゆる 。 オ リジン ジ ナ ルコ マシ 
ド が 使 を る よう に な る プロ グラ ム な の 
だ 。 画面 クレーム の 上 に ある プロ グラ 
ム を 打ち こん で RUN る せれ ば 、 自 動 的 
に マジ シン 語 を 書き こん で て 。 あ と は ブリ ロ 
ググ みみ を NEWL し て も PO1LL と も いう 


オォ オリジ ナル コマ ンド が 使え る 。 し か も 、 


ちゃ ん と チェ ッ ク サ ム 内 蔵 。 デ ー タ に 
打ち こみ ミス が あれ ば 、RUN させ た 
と き に ビビ ピッツ と 反 記 し て 、 そ の ミス の 
ある 行 番号 を 教え て くれ る の だ (た だ 
し 、BASIC 部 分 の 打ち こみ ミス は 関 
直し な がい) 


この BOOLL し よい ラコ ョ マンド は 、 要 きす 
る に CLS 2 と 同じ 働き を する の だ けど 、 
な ん と 8000 通 り の パタ ー ン で 消し て く 
も あの で 、 ペラ グル と の う 名 朋 を つ 
け だ っ て わけ 。 
@⑳ サ ンプ ルプ ログ ラム も ぜひ 試し て ノ 
POLL は 、 キミ の CG. や ゲー ム の 画 
面 ク リア に 使っ て も る 楽し いし 、 サ ンプ 
ブロ リグ クジ ウム の よう に デモ し に し て も お 
も しろ い ぞ 。 

この サン フッ レブ ログ ラム は 、 色 と パパ 
ター ン を 次 々 に 変え て 画面 を クリ ア し 
つづ ける と いう も の 。 ち ょ うど 万 華 鏡 
の よう な 感じ で 、 見 て いる だ け で も あ 
2 が tvOD7S よ 。 


〈 ゆ みち ゃ ん トマ ト > 逆 ぶさ 言 葉 プ その の 「 つ まん ね え ね ん まつ 」(〈 つ まん ね え 年 末 ) これ 実感 な の だ 。 去 年 の 年 末 は 原稿 書き に 追 
われ て い だ ん だ も ん 。 で も 、 こ ご これ な ら キ ミ だ つて な ん と な ぐ で きそう で し よ 


添 助 雪 室 で 大 先生 の 疹 作 7 当 た ら ず で 力 ち こめ る 


SF7 SHJFT S 朋 FT! 


mFOURH PC-B801.mkII 
時 N68-BASIC 
較 7 で ぶ 大 チ 


だ 。 ムッ 」 鋭 い 眼 光 を 放ち 、 で ぶ 大 先 


生 は 起き あがっ た か と 思う と 、 や お ら 
88 の キー ボー トド へ 。 キー を だ だ くさ こと 、 
9 の 2 人 ん KR 当 だ より 


だ し で て てき あの 
が っ た 話題 作 が 


の クサ 1/ と ん だ が 
に 面倒 くる が り 
や で も 気 ラ ク に 
打ち こめ る サイ 
2 人 KCp 0 の 3 た 
の お も し ろ さ る は 
舞 限 の 広がり を 
持つ 、 和 驚異 の 1 


A ム グリ グリ と 伸び て こる 棒 ブ ラフ を SHIFT さ ば き で し ば し スト ッ プ 。 プロ グラ ム ソ 


@ こ ん な に 短い の に 楽し さい っ ぱい 
「88 っ て キー を だ た たく と イン タラ プ ト 
が か か る ん だ よ な 。 特に SHIFT キー 


を 押し た と き の イ ンタ ラフ トト が いち ば 


な 大 きい "で j。 エ レベ ー タ ー の 定員 2 
人 分 と いわ れる 巨体 を ソフ ァ ー に 横 た 
えな が ら 、 で ぶ 大 先生 は つぶ や いて い 


が の だ / 
まだ まき だら 思っ て 。 と に が くす 
ちこ ん て て れ 。 
&s コ ンマ 1 秒 以 下 の タ イミ ング // 

る て 遊び 方 。 RUN さ せる と 、 左 端 か 
ら 中央 線 に 向かっ て グラ フ が 伸び て く 
る 。 こ の グラ フ は 、 何 も し な いと 30 秒 
ジャ スト で 中 央 線 に た どり つく の だ が 、 


1 CONSOLE ,,1:T$="99:99:99":FOR J=9 TO 1 
:CLS 2:LINE(329.9)-(329,199).6:INPUT"Hit 

[RETURN] "1A$:CLS:TIME$="90:99:99":FOR 1 
=9 TO 319:LINE(E,199)-(1,129) 5:NEXT:T1$ 
=TIME$:PRINT T1$:T$=MID$(T$+T1$.9+(T$2T1 
$)x8.8):PRINT "BEST TIME = )T も :J=9:NEXT 


Co ECY だ 


2 
7877 


と I I 1 1 IM 1 1 1 IN IM IN IM IN IN IM W W 】 


「」 
1 た 7( 事 と わ l 
い ミ に と こ - ぴ び l 
を トク うた 
上 い グ うう 人 グ ケ 
ピ く を な ス l さ ョ 
と は ダグ ノ / だ 
きか | ッ ツ ッ は 
| は っ ム プ の 1h 
| 常 て で な 精 1 
3 に あぁ ゲイ 1 
上 っ る | /\ y 
わ H * ム | タ 
上 ! 8 
由 く 1 和信 の オォ 大 』 
| _ シー 切 l 
(で を 行 ビ で 
| ス < く リッ 
3 7k た クィ る 
1 。 こん 4 。/ 


/ 昌 有朋 上 上 上 上 上 8 上 BI っ 


SHIFT キ ー を だ だ くだ びに わずか ず 
つ そ の 時 間 が 遅く な っ て くる 。 タ イミ 
ング る えび っ だ りあ えば 、 し ば らく の 
0 だ まだ まま 、 と いう こと だ っ 
て ある の だ 。 

コン マ ] 秒 以 下 と 上 いう タイ ミン グ を 
指 の 先 で 神 の よう に は か りつ つ 、SHI 
ド 渋 を 2G に きる "で 1 度 や っ 
だ たら 、 し ば ら 〈( 病 みつ き に な る ぞ 。 


ちの の は 、 ざ の アロ グラ ム 、 も ちろ 
ん トー ゼン 、 ハ イス ユア 付き 。 て ぶ 大 


先生 自ら の “世界 記録 ” は 2 分 42 秒 。 
この 記録 に クー を は じ め 、 ク ロ や オ サ 
ム さ ん が 挑戦 し て は 挫折 し て いっ た 。 
キミ も 挑戦 し て みて くれ 。 ど ん な に 区 
し い 記 録 か が 指 を 通し て わか る だ ろう 。 


一変 数 リス トン プロ グラ ム 解 説 

それ は と も か ぐ 、 こ の プロ グ 
ラム だ け を 見 て 、 何 を や つて い 
る の か が わか つ だ ら エ ライ ! 
一 チェ ッ フ ボイン ト 

ら SAVE する こと を 考え な けれ 
ば (と いう より の SAVE し よう こと 
いう 人 の 顔 を 見 だ い )、 行 番号 は 
不要 。 ダイ レン トモ ー ド だ け で 
遊べ る の だ 。 秘密 は り の ルー プ 
に ある 。 ' (で ⑳) 


2② 要 ) だ ま ら な いら し い 。 み ん な に ご の 楽し さがわ か る か な 


〈QSHIFT SHIFT SHIFT /〉 ゆめ みみ だ いな シロ ウト に は 、 こ の プロ グラ ム の 楽し さがわ か ガ ら な いん だ けど 、 クロ ウト に は 、 


\※705- つ 募 闘 ソロ と 屋 大 7@ 員 M 


放 尻 評 に わ み し い . 


プラ ク と コン セン 人 ム の あ 話 


ooHUUooDo0o 


T 


『 石川 県 の 中 3 、 河 崎 誠一 くん 


この プロ グラ ム は 、 ど れ だ け 短 く で き 
る か と 思っ て 作っ た の で 、 内 容 は イマ イ 
チ か も し れ ま せん 。 

受験 が 終わ っ た ら 

賞金 で ゲー ム ソ 

フト で も 買い た 

いと 四 い ます 。 

(編集 部 注 ・ 

ブロ グラ ム も 

た くさ ん 作っ 

て ほし いな ) 


ト 村 W 8 8 きき W W 『 W  『 W 『 1 | 


ト 8 IE II BI  』 』 II HI I IM  』 I # I I 】 ) 


ト 衣 NH NM 上 BE 8 上 』 昌  』 I H 』 ) 


競う っ て わけ 。 


衝 コ シン センド チラ タグ ガ 
主役 の 少し い キ ヤラ クタ 
設定 。 シ ンプ ブル で 感じ が 
よ ぐ 出 て いる ね 。 


プッ ./ と 思わ ず 
吹き 出し て し まっ た 
発想 の あま り の バ 
カバ カ し る さ ! 
1 画面 ブロ グラ ム は 、 
この ユニ ー ク な 発想 
こそ 、 命 な の だ 。 
画面 を 見 れ ば 、 だ 
いだい どう いう ゲー ム か わか る と 思う 
けれ と 、 画 面 の 上 の ほう に ある の は 
書 者 の 画 び ょ う で す 。 画面 左下 に ある 
の は 見 て の と お り 、 電 気 の プ ラグ 。 右 
に ある の が 、 コ ユン セ ント だ 
プラ グ を コン セン ト に 差し こむ 
使用 キー は 、 ス ペー ス ・ キ ー の み 。 
これ を 押す と 、 プ ラグ が ピュ ー ン と 伸 
び て 、 コ ユ コンセント に 差し こま れる の だ 。 
コン セン ト に プラ グ を 差し こむ 回 数 を 
画 び ょ う は 、 と い 


ー ニュ 
-、 感心 。 


SCREEN1 : CONSOLE 。 , 9 9:CLS:A=15 
IFP= 190RP= 29THENR= R+1: PLAT D 


0CATE19,R- 


1* 


PRINT" 


LOCATE19,R: PRINT"oo000oo0o0o" 
LOCATE6 , 19:PRINT" 


< 8 e * 計 
人 し ?$ 


B=R:A= 


カイ " : X= 
INT(RND 
B=B+ 1 :LOCATEA 
S=STRIG(9) : X= 
:LOCATEX , 19 :P 
LOCATEA ,B:PRIN 


4 


P=P+1 : GOTO6 
※19)+]11 

FRINT 

2 ( ぐ = 


":PLAY"b64" 


7 
( 
X 
R 


1 ) 
B 
+( 
IN 
し 。 


H=SCREEN(A- 2,B):IFH=45THENEND 
1FX= 18THENPLAY"964c64":GOT02 


_ ONBGOT06, 6, 6,6,6。 


て コンピ セ ンド) 


6.6.6,.6,5 


FURH PC-B001.mkII 
BBU1 N60-BASIC PAGE 1 
pY 党 奏 誠一 


を DI ま ら の クラウ グ と の や ジィ 
ト の 仲の よる を うら や ん で 、 ジ ャ マ し 
OL ぐる 897 だ 。 

画 び ょ う の 沙 ち て 〈 る 位置 は ラン ダ 
ム な の で 、 次 に どの あたり に 落ち る の 
か は わか らら ない 。 プ ラグ や 、 ユ コード に 
画 び ょ う が あ た る と ゲー ム オ ー バ ー。 

リプ レイ は チェ ッ ク ポ イン ト 見 て 改 
追 ん て お こう 。 

"10 カ イ ” と 20 カイ ” で 画 び ょ う の 
落ち て くる と ころ が 1 段 ず つ 下 が る の 
で あま あの と 難し て な る ぞ 。 

キミ は 何 回 、 コ ユン セン ト か ら 電 気 を 
取れ る か な ? 


軒 光 数 リス ト 


WS 基 地 の Y 喉 禁 
A…… 英 ( 画 び よう ) の XX 座標 
B…… 英 ( 画 び よう ) の Y 座 標 


X…… 自 分 の X 座 標 
HH Sie 判定 

一 プロ ブラ ム の 説明 
1 初期 設定 


2 4 画面 、 ス コア 表示 
5 6 敵 ( 画 び よう ) の 移動 
/<6 自分 の 秘 動 
9…10 ゲー ム オ ー パ バー 判定 
一 チエ ッ フ ボイン ト 
持 度 の こと で す が 、6000 系 の 
] 画面 は 、32X16 し か な ぐ 大 き 
な ハン プ デ に な つて いる よう で す 。 
と ころ で 、 こ の ゲー ム へ は いろ い 
ろ と 改造 し て み だ い と ころ が あ 
の ます が 、 と りあ え ず リプ レー 
を 付け て みよ うと 思い ます 。 
まず 9 行 ーTHEN END 
を THEN 12 に 変え 、 
ー INKEY$ : 


13 GOTO1 ジ 
に する と Y で リプ レー に な り ま 
すず 。 (エイ キチ ) 


画 び よう を よ け て 、 コ ン セ ント を 何 回 つなげ る こと が で きる か と いう ゲー ム な ん だ けど 、 ゆ み は 初 め て や つ だ 
と き は 5 ら 回 し か で きま せん で し た 。 み ん な は 何 回 つなげ る こと が で きる か な 


左 若 み め ら 攻め て くる フロ ッ ク の 閣 好 を くい と め み ろ ./ 
に ソン ノ 


/ も て ッ だ / 


BIOCK PANIC 


E2 


FURHFM-/8/ 
NEW/7/ 


Y WW474pPO/ 


軒 変 数 リス ト 
L( ),R( )…… 左 右 の プロ ッ グ の 
> 下 標 19 3SWINGE2RIN EOID A-Z:DIM L(16),R(16) :X=29:Y=8:T=9:SC 
29 FOR B=1 TO 16:L(B)=9:R(B)=39:NEX 
1 2 。 39 LOCATE 15,18:INPUT"LEVEL "iLE:IF LE=9 OR LE>3 THEN 39 ELSE LE=LEx2 
EZOE 49 LINE@(9,9)-(39,17)," 革 "1,B 
| 59 SYMBOL(15,155) ,"BLOCK PANIC",7,5.6 
69 A$=INKEY$:LOCATE X,Y:PRINT" " 
M…… プ ロッ ン 出 下着 断 7 IF A$="4" THEN P=SCREEN(X-1,Y):IF P<>219 AND P<〉135 THEN X=X-1 
LYRY…… 和 を 右 プ ロッ ツ の y 86 IF A$="6" THEN P=SCREEN(X+1.Y):IF P<>219 AND P<〉135 THEN X=X+1 
岩 標 99 IF A$="2" THEN P=SCREEN(X,Y+1):IF P<>219 AND P<>135 THEN Y=Y+1 
還 プ ロブ ラム の 説明 199 IF A$="8" THEN P=SCREEN(X,Y-1):IF P<>219 AND P<>135 THEN Y=Y-1 
10~ 20 初期 設定 116 IF A$="A" AND L(Y)>9 THEN LOCATE L(Y),Y:PRINT" ":L(Y)=L(Y)-1:SC=SC+5:BEEP 
30 レベ ル 選 択 129 IF A$="D" AND R(Y)<39THEN LOCATE R(Y),Y:PRINT" ":R(Y)=R(Y)+1:SC=SC+5:BEEP 
40- 50 画面 作成 139 COLOR 4:LOCATE X,Y:PRINT"*" 
60<220 メイ ン ル ー チ ン 149 IF M>1 THEN 219 
60100 プレ イヤ ー 秘 動 159 LY=INT(RND(1)x16+1) :RY=INT(RND(1)x16+1 ) 
110120 ショ ッ ト 169 IF LY=Y OR RY=Y THEN 159 
130 プレ イヤ ー 表 示 179 L(LY)=L(LY)+1:R(RY)=R(RY) -1 
140- こ 190 プロ ッ ン 表示 処理 189 COLOR5:LOCATE L(LY),LY:PRINTYH" 
200 プロ ッ ツク 衝突 着 断 199 COLOR3:LOCATE R(RY) ,RY:PRINT"H" 
210 ウイ / 、 表 示 298 IF R(LY)-L(LY)=1 OR R(RY)-L(RY)=1 THEN 24 
290 プロ ッ フ を 表示 す 219 T=T+1:COLOR 7:LOCATE 38,18:PRINTUSING"TIME 掛 ":T 
ろ カ の 表 定 、 ス コ 228 M=INT(RND(1)*LE) :GOSUB 239:GOTO 68 
表示 239 COLOR 7:LOCATE 9,18:PRINTUSING"SC | 折 持 "18C:RETURN 
30 錠 沈 9 249 SYMBOL(89,59) ,"GAME OVER",6,5,2,,XOR:SC=SC+T:GOSUB 239 
和 256 IF INKEY$="R" THEN RUN ELSE 259 


240250 ヴー ム オ ーー 


この ゲー ム か ら 新 し い ゲ ー ム へ 
ます 、 作 着 か らら この ジョグ ラム に つ 


て 、 ひと た 言 


F コ o 


「 こ の ゲー ム は 、 ゲ ー ム と し て 遊ぶ さ 


ゲー ム 、 1 画面 し し て は いろ ん な 要素 右 は 回 で 破壊 する の だ 。 プ ブロック 1 つ 


を 備 を て いる の だ よ 。 消す ご と に 50 点 。、 ゲ ー ム オー バー 後 、 
@⑳ だ ん だ ん パニ ッ ク ノ タイ ム が ボー ナス と し て 加算 きれ る 。 


まず レベ ル の 選択 か ら 始 まる 。 1 一 


長く PLAY し て いる は ほうが 得点 が 高い 。 


りこ の 内 容 か ら 発 展 き せ て 、 個 別 の ゲ 
ー ム を 作っ て ほし い 。 だ か ら 1 画面 に 
し まし だ 」ー 一 お ー、 鋭 いざ 葛 見 、1 
画面 の 世界 に また 新しい 展望 が 開け ま 


3 の レベ ル で 、 


214!6lg 


1 が いち ば ん シン ドイ 。 
キー で 、~ 介 "を 操っ て 、 左右 


か ら 伸 び て 《 く る ブロ ッ ク を 左 は [で 、 


左右 の ブロ ッ ク が 1 つ で も くっ つい 
だ らら 、 そら て ゲー ム オ ーー や っ て 
る うち に テッ る こと 受け あい / 


し た 、 な ん ちゃ っ て 。 考 えて みれ ば 、 


9 プペ の 09 


2 ば の に 


で も 、 作 者 も な か な か ご 謙 層 。 


ラク ル CLS2 な ん か も そ 


この 


ロロ HHUHDHDHH 

D ロ HUDUHHUHHUHHHH 
ロ UHHHHHUHHH 
ロ HHHHH 


HHHHH 6 
ロ HHDHHUHUHHHHHHHUHH 和 を 
H ロ HHHD 
HUHU ロ HHHHHHHH 
HUHUHUHUHHHHHUHUHHH 


HHHH 
ロ HHHHUDH 


上 上 朋 月 目 上 秀 見 】 

4 い 6 ロロ ロロ ロロ ロロ 

トド を うか 2』 ロ HHHHHHHHHHH ロ ロロ 

W 作 イ アパ 森 和 ロロ ロロ ロロ ロ 

| うこ ネン > 邊 HUU ロ HH 

て の ズ スコ 株 _ ロ ロロ nn ロロ n ロ 「 

邊 も ゲ ミ ン 用 上 

1 ら 1 が 歴 評 1969 _LEVEL 2 2 547 
え ム 上 半 

* :) れ を で 年 れ 

較 / る ば 土 お ` た 

| 放 て 台 と 上 

し し ぼ に っ 機 Wm 

1 SL は Am 

TL る 朋 新 る 信 ! W 4 左右 か ら 押 し よせ る ブロ 

m め な リ ペ ND も 機 し こ 押 ム * ツク 集団 。 あ つっ ち を 追い も 

1 る は 下 よ な 6 1 メ を 合 9 。 と し て いる うち に こっ ち が 

ン 学 ゲ で \ る うち に こ 

『 活け は ご ココ 39 つ か ひ | し の Oi 0 較 

8 う 楽 き は 320 の ば ム よ な Um 伸び て 、 だ ん だ ん パニ ッ ン 

| ソ に お ちい つて い ぐ …… o 


穫 テ ッ ビ 
表側 め グー 


< ゆみ ちゃ ん トマ ト ) 逆 さ 言葉 ン そ の づ 3「 ん 、 ガ みた だ べ だ が き が だ べ だ みか ガ ん 」( ん や 紙 廊 べた ガキ が 食べ だ みか ん) だ れ が 廊 


そん な ミカ ン ( あ 、 つ い 地 が 出 ち ゃ つ だ )。 こ れ は 、 テ フク ポ リ で いち ば ん スケ ベ な K-Ch8an の 作品 。 


※ グ ゴン 7009-Od 募 富 ? と と ロ と 破 必 7@ ll 


運 50*ー ャ ン ム 燕 5 ン トー Tn 


4 9 
まう 
! ラフ ョ 
1 ャ ス 』 
3 ん F ト nm 
W し た だ た!M 
か け 『 

ド _ | る 
FOR FM-7/ で て フリッパー の 向き を 変え る いと 1 
NEW7/77 キミ が 動か す の は い 事 /。 使 用 キー は ン - 
4|EI6 だ けど 、 ん 、4 方 りな が 。 8 * 
pY 万 友人 款 es と 2 加重 を プ な お 初 に お 目 に か か り ま す 。 友 奈 で す 。 - 
ーー - の に させ ー と 人 う て し ょ 。 4 は 進行 最近 、 学業 が 忙し くっ て MYOCOM に 触 『 
9 吊 が わ や くち ゃ に な り ま っ せ ー ン 方 向 に 対し て 左 へ 、 [6 は 右 へ 曲がる ハ っ て な いん で す 。 2 年 も か け て コン ピュ 四 
に 、 エイ キチ が 叶 価 表 に 書い て いた 。 ンド ル な の だ 。 何 も し な いと 事 は よっ 古語 寺 に 

5 * だ た ee 9 さ こ o 
立 価 表 と いう の は 応募 作品 1 つ 1 つ に すぐ で 進 り だ け 。 で 、 昌 の 通っ た あと は  』 は 、 み な さん の ご 発展 を 祈っ て 。 才 具 。 『 
7 つの 点 か ら 評 価 し た 書類 で す 。 道中 に ある フリ ッ パ ー (短い 線 ) が 


か くい う 私 も 、 こ の ゲー ム を 見 て 、 の 進行 方 向 と 同じ 向き に な 
最初 何 を し て いる か わか ら な か っ た し 、 る 。 こ れ で 、 あ ちこ ち は ね 議 還 較 還 際 CCCE 押 に 
ゲー ム の 説明 を 聞い て も 何 を し て い い まわ る ボー ル ( 氏 ) を ? 
か わか ら な か っ た 。 の か た だ まり へ 読 導 する ゲー 

ふーん 、 こ うい う ゲ ー ム も ある の だ ム な の だ 。 ど うだ 、 は じ め 
な あと 、 何 と な 〈 く 不思議 な 気持 ち で F CC だ だ の う 。 だ だ し 。、 台 


M- 7 を な ぜ る 私 で し た 。 が 多 に つっ こむ と ゲー ム オ 
っ 。 3 

一 変数 リス ト 半分 は 連 、 半 分 は 腕 。 う 

G.…… 玉 コ ゴア は 3 JA 


BX( ),BY( )…… ボ ポー ル の 只 標 い 高 得点 が 出る そう だ 。 


XV( ).YV( )……: ポ ボー ル の 物 動 4 説明 を よ ぐ 読ま な いと 、 


廊 向 0 な か な か が 正体 の つみ め な い 粉 
PT…… ル ー プ カウ ンタ 了 16 不思議 な ゲー ム 。 (の S 
0 EE マイ /、 加 LN を 」 
E,F…… ボ ー ル 表示 OFF 用 5 > 
G.H…… ポ ボー ル 表 示 ON 用 / ) NN 
VX,VY…… 自 分 の 移動 廊 向 
CD…… ダ イヤ の 座標 
XY…… 自 分 の 座標 
ゆ …… キー 入力 19 WIDTH49,25:CONSOLE9,25,9,9:DEFINTA-Z:S=9:LINE(9,9)-(9.9)," ニ "6:LINE(39,.9)-(39 
V…… 自 分 の 移動 演算 用 9) "6:FORI=9T03:SYMBOL(163+1,9),"F L I PP E R",3,1,(2-(I=9)x2) :NEXT:COLOR7: 
Mb…… 自分 の 消去 用 キヤ ラ LOCATE8,1:PRINT"Score: 9 time 399":PLAY"T299" , "T299":RANDOMIZE TIME/4 
回 画面 判断 用 29 BX(2)=1:BY(2)=3:XV(2)=1:YV(2)=1:BX(1)=37:BY(1)=4:XV(1)=-1:YV(1)=1: PT =3: 征 =3909 
n…… プ レイ 文 デ ー マ 用 39 E=1*F=2:G=2:H=2:COLOR5:LINE(9,2)-(39,23) ,"1"。,B:LOCATE8,2:PRINT"r":STRING$(38 
較 プ ロブ ラム の 説明 っ つう > っ "ELOCATE9 、23:PRINT" に "STRING も (38 "ーー") 1 は 9: LINE(1 .3)-(38, 22 ) ," 還 " , 1 ,.BF 


49 FOR1=3T036STEP3:LINE(I,5)-(T,29)、" "ENEXT :FORI=5T029STEP3 :FORJ=3T033STEP3:LOC 


10- 20 タイ トル と 初期 設定 ATEJ, 1:PRINTCHR$(149+INT(RNDx2)):" "ii ENEXTEPRINTCHRS(149tINT(RNDx2) ) :NEXT:VY=1 


30- 40 画面 設定 5 C=(RNDx11):D=(RND(1)x5) :LINE(Cx3+2,Dx3+4)-(Cx3+4。Dx3+6) 。"$",4。BF:X=18:Y=11 
50 60 ダイ ヤ 表 示 と オー ブ 68 PLAY"18o4fgab-o5cdefedcb-agf","1803cr4er4cr4er4a9f":FORI=8T020:FORJ=9TO199:NE 
ー ン プ ミ ユー ジッ ク XT:COLOR=(4、4+(I MOD2)x3) :NEXT:FORI=9T04:PLAY"132n88" :FORJ=8TO289:NEXTJ。! 

70…130 メイ ン ル ー チ ン 79 COLOR7:1FT<9THEN159ELSE LOCATE27,1:PRINTT:ON PT GOTO106,109,89 
70 ツイ ム オ ー バ ー 判 869 I$=INKEY$: IF SCREEN(X+VX,Y+VY ) =234THEN159ELSEIF 1$="4"0R 【I$="6"THEN V=VX:VX=V 
定 と ダイ ム 表 示 Yx((1$="6")x2+1):VY=Vx((1$="4")x2+1 ) 
80~- 90 自分 の 移動 と 音 99 PLAY"116o59" ,"116o6c":M$=CHR$(159+(VY=9) ) : V=X+VX-19:IFV く -160RV>17THENVX=VXx- 1 
100-110 ポー ル 物 動 と 命中 :GOTO128ELSEV=Y+VY-12: IFV<-70R V>8THENVY=-VY:GOTO120ELSE128 
判定 199 M$=" ":R=SCREEN(BX(PT) ,BY(PT) ) :PLAY"C","C": IF R く <>159THEN YV(PT)=-1xYV(PT) 
120 ポー ル 表 示 の ON 119 IFR=234THENVX=9:S=S+FIX(T/59)*19:GOTO146ELSEIFR>149THENXV(PT )=XV(PT )- 1 
OFF 12 E=G:F=H:G=(PT く >3)+2:H=(PT=1)+2:PT=(PT MOD3)+1:T=T-1:COLOR5 
130 ポー ル 、 自 分 の 表 139 LOCATE X,Y:PRINT M$:COLOR6:X=X+VX:Y=Y+VY:LOCATEX,Y:PRINT" ま ":SCREEN2,7:COLOR2 
款 *FORI=E TO F:LOCATEBX(T),BY(1I):PRINT" ":NEXT:FORI=1T02:BX(T)=BX(IT)+XV(I):BY(I)=B 
140 スコ ア 表 示 、 面 クリ Y(H)+YV(I) :NEXT:FORI=G TO H:LOCATEBX(I),BY(1) :PRINT"@":NEXT :SCREEN7 ,7:GOT078 
っ 149 LOCATE14,1:PRINTS: :FORI=19TO64:J=T+29:PLAY"132n=1i" "132n=J:" ENEXT :GOTO28 
150 ハオ ニニ 159 PLAY"o5afc+o4afc+8","o3afc+afc+8":FORI=8TO1:SYMBOL(144+1,112+1)."GAME 0 


V E R",3,1.2+Ix4:NEXT:LOCATE15,17:PRINT"Push anykey to start":I$=INPUT$(1):RUN 


アフ トー あみ ちゃ ん トット) 好き 言葉 その 4「 う 、 ど ぷ を ある いて いる ああ ぶどう 』( う 1 ドブ を 歩 いて いる 青 プ ド ウ ) こ れ も K-ohgn 
昌 (1 あ 4 の ff 記 。 フル ー ツ シリ ー ズ と いえ ば きれ い に 聞 こえ る けど 、 な ん と な くき ちゃ な いな ー。 


シン フク ウレ キャラクタ の 他 門 沈 


まる 対 ご ん がく 


/ ュ //2 


ポシェット 


中 FORH M5〔Pro.Jr] 
BASIC-G 


國 Py 藤 妃 誠一 


田 変 数 リス ト 
C…… さ ん か ぐ 機 の キヤ ラフ タ - 
ナン バー 1 00 v US 1 44212508 
X.Y…… さ ん か ガ ぐ 機 の 座標 ) 各 ミヒロ 19i=COd 2 5 ミ ヒ O1 デュ 6 し = 
V.W…… さ ん ガ ぐ ご 機 の 移動 の 際 =C0d さ ュ し EKW ニ 1 と Hi リミニ 9i 四 Hi 1 ロ C ご 上 ロ >T 
の 増分 2.19 AT 5 ES CIGYA UM 
(21)。 、 :hexti ま LiecCOn FIHdU(9)149:iloc Bt 
MINL2nS00S 失 ガワ ラク 8 0o FndC24)。FndC1)*192-15 ま Pl=statU5( 昌 > 
る と き に 使用 3S Print 回 Sc 8) HEH:FmTCoOinC( り ):0=c 
Ke< ギ 一 入力 用 ロ ihnCK32g1† 日 =E 四 theah Wu 時 ttQ 褒 >FhHHC1 ア 5 
U…… ま る 機 の ステ ー タ ス 22120YE MGRS 1 8 ST IT 
T…… 自 機 の ミサ イル の ステ ー = ュ K ニ 1 ロロ ドロ 9 て) 1 1 ニコ 生 th じ = ニ 1 コミ リ ニ = 
タス ーー ドミ ョ コ 6 0 と 『 
2 っ あたっ つた スプ ラ コ = *|= ニ 8 トコ tUS(Z リ 511 トニ =h し =1 コ し 
10020 =0:U=-9 slse 11 K=46 then C=153:U=6EU=3 
_ 生 ニ バキ リロ ミ マ デニ リオ 四 ま 5 ヒロ ぅ > じ ! モ ヒロ > (59 S。)。【 
O…… ざ ん が ぐ く 機 に あ た つ だ ペ / 10 に 2 【O0 VM.VE1T(K= う 232*(T=Bthen_ lnc 2 
の 92 ca to#SiFla9 "nuBegd"imoue Z steFP U」 則 .3 
S…… ス コア り 5 11 % ッ then が =D else if 2 く < than = 
H…… ハ イス コア ォ 1 Y2N_ theh Ys=D elee 11 て 9 then 『=h 
一 プロ プラハ の 説明 19 1| P= ァ theh Pla9 116Cd 2!5=5+T1HB:9otno 
2 初期 設定 $ ま し else 11 U>ー-1 thehn 9oto ま B else 9oto $ 
3 スコア 表示 、 ま る 和 機 Ps*BiU=Dierasa 1:for 」=15 to B steP-1 
2 1]1 arase さ 3:is9 3.5,1isleeP 1.5S:nextiPFint 
の 移動 >。 。 。 。 よ よ せよ よせ よせ ロ HHE _UUER Ii ュ 1 5>H then H=5 
4… / キー 入力 、 さ ん ガ ぐ 12 1 asu(gDthen 5=9:9oto 1 else 9oto 12 
機 の 秘 動 
8- 9 画面 の 端 に さん か ご 
機 が びき た と き の 処 理 
10 まる 機 に ミサ イル が 
あな だ つた 
4 の ーー オー リー 〈 ( @⑳ ル ー ル は か ん た ん . ノ 軸 キ ー を 持 す と 
田 チ ェ ッ フ ボ ポイント M 5 連盟 っ ちゅ う も ん が ある そう だ 自 冶 し て し ま 5。 
絶 体 紀 命 の 際 の 緊急 ワー ブ ボ 2 5 、 9 の 0 
25 つの ね 。 今 まで 知ら な か っ た 、 不 旨 強 で し な ぜ て し ょ ね 。 
ー を か け て 次 の 1 行 を 加え て く た 。 で 、 作 者 は その 連 映 に 所 属し て る それ か ら 、③ は 


れ 。 

55 IF K=34 「H 
EN V=RND (31) :W 
=RND (21) 

X メ キー ガワ ー プ ボタ ン に な る 。 
じゅ うぶ ん 敵 を 引き つけ て お い 
て 、 ミ サイ ル を 射 ち 、 す か さ ず 
ワー プ ] な ー ん て ね 。 (ウー) 


の 

を それ と は 全く 関係 な 
く 、 ゲ ー ム の ルー ル は 
い だ っ て か ん だ ん 。 キ 
SI の も 呈 き 
に 向かっ て ミサ イル を 
や 放っ て くる “まる "( コ 


動き は じ め る と も 
う 止 ま ら な い 。 それに 、③⑧ だ け は 画面 


の 端 で 反対 側 に ワー プ す る 仕組 な の で 、 


が 自分 で 撃っ た ミサ イル に あたっ て 
し まう こと も ある の て 注意 。M 5 らし 
い ム ー ド の ある 1 画面 ゲー ム な の だ 。 
田 参 考 文献 一 一 「 テ クノ ポリ ス 」 84. 


ンピュータ ) を 2 月 全 "VECTOR 
ご どこ が ユー モラ ス お 宇宙 戦争 。 や っ つけ る 。 
| 有明 胃 胃 まき 朋 8 胃 見 胃 
ら と 1 の 9 Hi 4Bg 2 名 (- < 4 
か ら RUN 直 後に ミ lm タイ トル その まま の ゲー ム で す 。 ち な 1 
サイ ル を 撃っ て 上 み に 何 を 血迷っ た か 、『 ま る 対 さ ん か く IHI』」 
は いけ ませ ん ノ / ノ 6 も 作っ ちゃ っ た ん で 、 を 名 御 期待 (と い - 
N ュ ラ クア ェ Em うほ と の も の て も な いか ) と ころ で ョ 』 
さん が く 「( え この “1 画面 ゴゴ ロ グラム”、 暇 の な い 学生 
ー い 、 面 倒 だ 。 に と っ て は ほん っ と に 重宝 し て いま す 。 ・ 
以後 ⑦ と 表記 す 康 潟 M 6 - 
る /) の 移動 は 2 フ W 
8 
カー ソル ・ キ ー。 ん 誠 草 上 
ミサ イル 発射 は を うっ 商 6 0 
皿 キ ー だ 。 た だ 。 言 宣 田 新 ・ 


し 、RUN 直 後に 


と 」 
mm 


ト 月  8 朋  M 上 Bl BI  』 つう 


\ ら ルン ※/- ゴ 募 光 ソ と ロン 違 属 @ 川 川 


〈 ま る 対 さ ん か ガ ぐ 〉 これ も 動き まぜ ザ は や こく て な か な ガ う まぐ で き な い 。 あ ん まり あ だ ら な が ガ つ だ けど 、 そ の うち きつ と うま ぐ な F ん た 
る も ん ね 。 ネ ー ム の つけ 万 も 単純 だ けど ご 、 ず ば りつ て な か ん どじ 。 


/ 遍 / こ 府 め こん だ 、 砂 迷 論 紀 の エッ セン ス 


けい 


バー フェ クト 神経 衰弱 


95 


すい じゃ ぐ 


CLEAR:CLICKOFF:WIDTH88:CONSOLE9 , 25.9,89:DIMA$( 26 ) ,C$(79,24):S=8:E=389B:P=2 
WHILEP>1: INPUT "テン KEY=9 JOYSTICK=1 "iP:WEND:FORI=1TO26 :READB$:A$(T)=B も :NEXT 
CLS:COLOR2 :LOCATE29.9:PRINT"" - フ ェクト "COLOR5 :LOCATE38 ,9:PRINT "シン サイ スイ シャ ク " 
A=1:D=1:COLOR6 :LOCATE31 12:PRINT"PUSH SPC OR TRG": IFSTRIG(P)THENCLSELSE25 
IC0>9THENR=9:G=9:CLS:GOTO048ELSES=9 :G=9:E=3899:R=9 :CLS 

CLS:PRINT" ス コシ マッ テ ":PLAY"A9":FORK=8TO79:FORL=6T023:C$(K,L)="":NEXTL,K:CLS 
K=INT(RNDx48)x2:L=INT(RNDx19 )*2+2: IFC$(K,L) く >" "THEN49ELSEC$(K,L)=A$(A) 
C$(K,L)=A$(A):PLAY"A9":COLOR5:LOCATEK,L:PRINT "H" :A=A+1:TFA く 27THEN49ELSEO0=0+1 
COLOR4:LOCATE8.9:PRINT"PUSH SPC OR TRG": IFSTRIG(P)THENF=49:GOSUB12ELSE56 
EsE-1:IFE く 9THENCOLOR2:GOTO115ELSEGOSUB139: 1=@:1=STICK(P) 

IF1=8THENG=Y- 1ELSEIF1=2THENG=Y+1ELSETFT=6THENF=X+1ELSEIFI=4THENF=X- 1 
IFI=@THEN55:DATAA,2.3,4,5,6,7,8.9,16,J,Q,K,A,2.3,4.5,6,7.8,9。19,J,Q,K 
IFF<80RF>790RG<10RG>23THEN55ELSEIFC$(F,G)=" "THENGOSUB128:GOTO55 
IFD=1THENE$=C$(F,G) :H=F:J=G:D=2:GOSUB126:GOSUB125:C も (F,G)="":GOTO55 
F$=C$(F,G) :M=E:N=G:LOCATEM,N:PRINT" ":GOSUB125:D=1:PAUSE19:LOCATE48 9 
PRINT" "iTFE も =F$THENC も (H,J)="":C も (M,N)="":GOTO95 
EsE-59:COLOR5:LOCATEH,J:PRINT "H":LOCATEM,N:PRINT"H":F ま ="" EC も (H,J)=E も :GOTO55 
RsR+1:F$="":PLAY"A9A9A9A9A9":PAUSE10: IFE$="A"THENS=S+190908:E=E+598 


199 IFE$="K"THENS=S+5999・*E=E+499ELSEIFE$= "Q"THENS=S+ 3999:E=E+399 

195 IFE$="J"THENS=S+1699:E=E+209ELSES=S+199xVAL(E$) :E=E+109 

116 IFR く 13THEN55ELSECOLOR2:LOCATE48,9:PRINT"W - テ クト "iS:GOSUB138:GOTO25 

115 LOCATE48,9:PRINT"GAME OVER SC":S:PLAY"C9R8C8R8C8R9C8C8C6C9C6":0=9:GOT025 
129 COLOR6:LOCATEX,Y:PRINT" ":X= FiYs=GLOCATEX,Y:PRINT TH":RETURN 

125 COLOR4:LOCATE48,9:PRINT"1 か トト "ES "2 カト" "5FS:PLAY"A6C9A9" :RETURN 


139 COLOR7:LOCATE5 ,9:PRINT "SCORE")S: "ENERGY "Ei: "ROUND" 0:RETURN 


{へ へ? へ へ? へ? へ? へ 4?〈^〈<? へ {へ {へ 4?〈{m〔 


1 いっ 昌 。 その 番組 は し っ か 』 イス ティ ッ ク で 、 色 の "フラ 
の な は まり 見 て まし た / カー ド を 動か し 、 好 き な 2 

は いす う 高 | 』 。。 召 い カー ド (26 枚 の カー ド ) 

ま 度 1 神 生 の と に この ま て も っ て いく ダグ 

採 パ 還 則 イク Ul めく 5/ っ て 感じ で 、 カ 

1 まん は 年 所 月 ーー ド が めく れ …… れ ば いい ん だ けど 、 ( 
ななめ 欄 権 「 )『 めく っ た つも り に な っ て 、 右 上 の 表示 
の の の 殺人 N /』 。 を 見 る と それ が 何 の カ ー ド か わか る 仁 

EE な らい 1 組 に な っ て いる 。 ち な み に 青 い カ ー ド 
た だ 組 で の 1! は A 一 10、、Q、K が 2 枚 ず つ 設 定 
aa 9 。 。 され て いる よ 。 


%S カ ー ド を 半分 使っ た 神経 衰弱 
よく 考え ん る と トラ ンプ が 26 枚 し か な 
いん だ 


弦 。 よ 


KBDIN す の で 。 デン ジャ キー か が ジョ イス 
ゲイ ッ ク グ が か を そ 瑞 いて くる に 
いい /) の て 、 お 好き が は ほう て と 5 ぞ 。 
EC で る PUSN SBPC OR 


画面 に 


22 KHR 

で 、 神 経 衰弱 し て いく わけ だ けど 、 
それ だ け じ ゃ な い 。 キミ の エネ ルギー 
けれ ど 、 こ れ は まさ る しく 神経 誤 は 決め られ て いて 、 エ ネル ギー が 0 に 
く 、 1 画面 に な る さめ だ も ん が だ 。 


マカ ン と 記憶 力 ガ が 勝負 の 決め すず / 


の 心 づ か 


FURX1 シ リー ズ 


pY みあ だ る 


な る と ゲー ム オ ー バ ー! 
の だ 。 お 手つき する ご と に エネ ルギー 


画 変 数 リス ト 


計 人 ee 本 

R…… 得 点 し だ カー ド の 組 数 
D…… 第 1 第 の カー ド 判 定 用 
B や や …… デ ー タ 読み こみ 

AS( )C$( )…… ブ ルー カー ド 

OS の 
Ki ツー ブ ルー カ ー ド の 座標 
AOeeeF 回 に の 二 ド 
の 座標 


E$… 第 1 カー ド の マー フ 
F$…… 第 の カ ー ド の マー ク 


一 プロ グラ ハム の 説明 

10 初期 設定 

15 JOY Or KEY セ 
レク ト 

20- 25 タイ トル 

30 面 数 判定 

d5 グ 面 か ら の 変数 グリ 
ア 

40- 45 ブ プルー カード 表示 

50 が ーー 人 の スタ ダート > 

55 エネ ルギー 判定 

60 キー 入力 

65 こら 

70 イエ ロー カー ド を 動 
ガ す 

75- 65 カー ド マ ー ン 判定 

90 ミス カー ド を も どす 

95-105 得点 

110 パー フェ エン クト 判定 

15 ゲー ム オ ー バ パー 

120 イエ ロー カー ド 表 示 

125 カー ド の マー 表示 

130 スコ ア な ど ご 表示 

田 チ ェ ッ クボ イン ト 

こ ご この プロ グラ ム 、 ち よ つ と 問 

題 が びあ め つ を だ の で を 入れ て お き 


まし た だ 。 な か ガ な が ガ 楽し い ゲ ー ム 
だ けど 、 カ ー ド の キャ ヤラ が 小さ 
いな 。40 文 字 モ ー ド に し て カー 
ド ら し ぐ 見 せる よう に 縦 の 倍 に 
し て 、 し て マー ク を カー ド の 
と ころ で 反転 文字 で 表示 、 と い 
うつ よう に すれ ば も つこ と 見 だ 目 が 
よ ぐ な る の で は (パン プ ) 


022 


7 を 


TRG” の “SPC” は スペ ー ス ・ キ ー、 
"TRG" は ジョ イス ティ イッ ク の トリ が 


が マイ ナス 50 さ れる の で 、 慎 重 に ね 。 
全部 あて て し まう と パー フェ クト て 次 


ーッ ボタ シ 。 の 面 へ 。 カ ー ド に よっ て 得点 や エネ ル 
テン ・ キ ー (2I4I6I8) また は ジョ ギー の 増分 も 培う の で 戦略 も 必要 を う 。 
本 ジェッ トー の < ゆみ ち 。 ん トマ ト > 如 さ 言葉 ン そ の 5「 み せな さい ちい さ な せみ 」( 見 せな さい 、 小 さ な セ ミ ) た まだ ま 隣 り に い だ 東京 ・ 朝 人 


表 個 1 あ 


秀雄 ぐん の 作品 。 わ 一 、 パ チ パ チ パ チ 。 こ れ だ つ だ ら 、 ら カラ グラ ム あ げ ち ゃ う | 


こい うわ け で 、 キ ミ の 作品 も 送 つ て ね 。 


7 な 


示 * アオ 


いみ * げ っ こ 


地 応 の で 凍 の 広げ られ る 恐 訪 の 即 


FOH MZ-700 シ リー スズ 


X…… 自分 の X 座 標 10 CHOLOR。 の 
マ …… 自分 の Y 座 標 20 CLS: CDLDRS。 6 OCRIED TI 1=1 TODBBO 
ga NR さ O PRINT " 抄 "s INEXTI X=25s Y=1 昌 HsLDCATE O。1 
E( )… 岩 の Y 上 座標 40 DIME (9) 』 X (DO) =1 : eyOiprn 1=OTD39: 
D…… 敵 の Y 座 標 E(T)=1:LUCATE1。 1: PRINT" "ig ENEXTELDCATE9。 
E…… 敵 の XX 座標 11:』PRINTSPC (22) 』kX(1) テ ー1 5:Y( つ ) = テー1 :Y( 計 ) =1 
ら S.…… ス コア 5Q PLAY 7。"COBE"sD=15E=1OkF=3: BDTD 15O 
ビ .…… 敵 の 進む 方 向 90 Me X』 YiK=SC(INEEY ま も (O) ) 2BE TF KO 
KS さ 3 THEN 100 ELSE M=X+X(K) EN=YT+Y (に) 
か PE 時 7O0 1=X: Ne*=SCERN*(M。N』 1 ) : TF N も =" 人 まり OR N あ =" 
6 @" OR NM<1 ORM>3 OR N<1 ロ RN>22 THEN 100 
60- 70 自分 秘 動 


BO_ COLDR 5:X=M:Y=NEPRINT " "』 3 N 和 ま =SCRN 和 も (1 
*E(1)+1。1) :TF N ま =" 炒 "DR N あ も =" ホリ THEN 10O 
0 E(T) =E(1)+1: LUCRTE Xa。YEPRINT "本 "ggLHC 
TE IaE(I)5PLAYTCTSPRINT " 還 語 "EGOTO 0 
1O0_ LOCATEX 。 Ys PRINT" 木 団 " ss =D+X (F) giN=E+Y ( 


80- 90 岩 の 沙 下 
100 自分 表示 、 ゲ ー ム オ 


120 敵 移 動 に F) : N$sBCRN* (M。N。 1 ) : IFN$=" 木 "THENBEEP END 

130 一 140 敵 の 訪 向 を 変え る 110 1FSCRN も (D。E。 1) く >" 全 "THEN5=+1 : BDT ロ SO 

田 チ ェ ッ フク ボ ポイント ND(1) *4) giBDTD1OO:ELSE D=MiE=NEPRINT" "』s 
ッ 13O IF D=X THEN F=(BGN(YーE) +1) /2 ォ 2 

前 回 に 引き 続き 、MZ-7/00 フォ 

は 力作 ぞろい で 選考 に 苦労 し て R 6: IF E=Y THENF= (SBN(D-X)+1) /2 


130_ LUCATED』。E*PRINT" ま 回 GSCT5SiEGHTO 60 


し まい まし だ ただ 。 ご この ゲー ム に つ 
いて で す が 、 リ プリ ー が ガ が 付い て 
いな い の が さび し い 。 

そこ で 00 行 で 世 選 記 ! 
ND を 消去 し 、 ガ わり に 160 
を 入れ て ぐだ さい 。 次 に 
16 の Z$= INKEY$ や ・: 
IF Z$=* THENRU 
N ELSE 160 

に し て みて ぐだ さい 。 ス ペー 
スキ ー で リプ レー で きま す 。 

(エイ キチ ) 


カン と モン スタ ー を つぶ し て いく の は 
あの 空気 袋 が いっ ぱい つま っ た 包装 材 
料 を フチ フチ つぶ し て いく みた いで 、 
快感 。 

モン スタ ー の 動き は 、 プ レイ ヤー と 
座 本 が あえ ば 追っ か け て くる も の と 、 
進め な く な れ ば 向き を 変え る も の を 組 
みあ わせ て いる 。 

こう いう ゲー ム は 、 敵 の 動き を 読ん 
で 、 お びき よせ つつ 倒し て いか な くも 


ら C ダ 
まま まま まま よる も. ーー トナ ナル 


@⑳ 穴 を 掘っ て 石 を 落と し て …… 

どう し て “お みろ か な な の が か は わか 
ら な いけ ど 、 こ れ は 要する に 人 岩石 落と 
し ゲー ム 。 

画面 の ほとん ど は 土 と 考え よう 。 土 
の 上 に は 、 岩 石 が びっ し り 。 土 の な か 


4 今 ま さ に 岩 が 落ち よう と し て いる 場面 を 
拡大 し て み ま し だ た (実際 は この 4 倍 く らい > 


コリ リズ ンプ / ア ゴム 侍 ん / ブ フー / /4 ii 


を 掘っ て 進む キミ は ^ 木 "、 追 っ か け て や いけない から 、 相 手 の ク セ を 見 抜く 6 フ ム ム 、 悟 っ て る ね 、 福田 くん 1 
くる シス ター は “の ゐ @ た だ た 。 の $ も 大切 だ ね 。 W を 
カー ソル ・ キ ー で 上 下 左右 に 動い て 、 つい で に 、 読 者 ・ 投 稿 者 へ ご 注意 わ 思 る 刈 ピ 
岩石 の 下 ま で 穴 を 掘っ て いき 、 サ ッ と ちな み に 、 こ の ゲー ム は も と 『 デ グー 上 引 生 を 1 
身 わ か わ し て 岩 且 を 落と る う 。 モン ス ダグ 」 と いう 名 前 だ っ だ の だ 。 ナ ムコ 1 いそ 刈 な な 
ター を 人 巻き こめ ば 1 点 追加 だ 。 の ディ イグ ダ グ 』 と よく 似 て いる の で W ー る 体 と て - 
9 英 の 動き を 読 変え て も ら っ た っ て わけ - Stn 
リプ レイ や ハイ スコ ア が な いけ れ ど 、 ゲー ム そ を その も の は 、 容 を 据 っ て 石 を 0 か の の 1 
結構 遊べ て お も しろ いよ 。 リ プレ イ は 、 落とす と いう 点 が 同じ だ け で 、 あ と は うり 26 
チェ ッ ク ポ イン ト を 見 て 付け 加え て お まっ た 〈 く 違う か ら よ か っ た ん だ けど 、 に つか か で - 
こう 。 ハ イス コア は 、 宿 題 。 最近 、 市 販 ゲ ー ム や アー ケー ド ゲ ー ム 1 ん 素 ぼ べ バ - 
岩 の 落 ちる スピ ー ド も 速い 。 こ れ は と そっ くり の プ ブログ ラム も 多い み だ い 。 お 訪 は に っ 
自分 が 通っ た と ころ の 岩 だ け 落 ちる 処 プロ グラ ム 力 は 認め る けど 、 を そう いう NN 電 
理 を し て いる た め ら し い 。 ボ カン 、 ボ 作品 は 採用 で き な い の で 注意 し て ね 。 の 
本 ミット 4 < ゆみ ちゃ ん トマ ト > も うつ ひとつ 、 読 者 か ら の 作品 を 募集 し ます 。 題 し て "ウニ ウー 会 話 シリ ー ズ "< 例え ば ね え …… 「 隣 り の カ 2 


コイ に ヘイ が で きだ つて ね え 」「 ふ ー ん 」。 ぜ ー ん ぜん 意味 の な い 会 話 だ けど 、 ち よ つ と お あか し いで し よ ょ や お か し ぐ な い ガ な 。 


表 個 9 


アラ ー グ ラフ ィ ッ ク を 使っ た 、 引 の 疫 疾 人 品 


3 詳 ル 大 


ンコ 


ROCK-CRAS 崩 


IFOUR MZ-8000O 


と 


+G-RAM1.2.3)//eUO 
MZ-1Z002/2Z002 
園 PY 店 不 放 


名 を 砕け る の は 腕 だ け 

この ゲー ム は 、 カ ラー・ デ ィ イス フレ 
4 だ に つか が いて や っ た ほう が いい みた だ い 。 
MZ-2000 の 1 画面 ジロ グラ ム で は ちょ 
0 まし グン クイック の きれ 6 恋 
の の 

キミ が 動か す の は 、 右 を 向い た ロボ 
ッ ト 。 動か し 方 に ちょ っ と クセ が ある 
で 。 

4 で 左 へ 、 I6C 右 へ 、[8IC 上 昇 …… 
と ここ きま て は ぶよ つ うだ けど 、 を は な 
すず で スル ー ツ と 衝 ち て し まう 。 

で 、 キ ミ の 目的 は 画面 に 散ら ば る 人 岩 
を 砕く こと だ 。 た だ し 、 光 を 反射 し て 
いな い 岩 は で き そ を こないだ か ら 無 視 し 
も あの 0  P000 て だ 。 

石 を 砕く の に も 、 コ ツ が ある 。 背中 
と か 頭 と か 中 で は 砕く こと が で きず 、 
が えん つて 3 電 に や らら 作 て し まう の だ 。 た 


CURSOR ら 916: PR INT "ROUND "・RO : " 


0 ココ の 回 OPD っ ーー 


だ 、 岩 の 半分 どけ な ら 、 頭 や 足 で 削れ 
る けれ と ど と 、 そ れれ 以上 や ろう と する と 、 
や っ ぱり や られ て し ま う 。 

だ か ら 、 い ちば ん 頑丈 な 腕 だ け で 岩 
を 砕く こと 。 つ まり 、[6 の キー を 押し 
て いる と き し か 、 岩 は 破壊 で き な い の 
が 

ゲー ム ス タ ー ト は 全 自 動 、 リ プレ イ 
6 全 目 動 。 ロ ボッ ト が 3 吾 こ われ る と 
ゲー ム オ ー バ ー が だ 。 

ポイ ント は 人 岩 1 個 100 点 。 ほ か に タイ 
ム ・ ボ ー ナ ス も あっ て 、 面 クリ ア 時 に 
の が フン ラス マイ ナス きれ る よ 。 


人 @ 半分 だ け 削 られ だ 岩 。 
ちゃ ん と 削ら ね ば 。 


が 
ソ 、 で 8 な が め 
ん 生 て ・ < ーー 故 2 


"ROUND: "iROi TaRBC 7 ) : "LEFT:"・ME 


つよ 1EK 1 上 !! い 


< 
0 


W 邊 
ーー や 」 
8 の ョ 
W カ ョ 
9 BI 
8 ? 
"っ で そ ラ ッ 。 が 
W と その フ ロ 掲 に 

W 伯 が ゲイ グ 載 王 B 
らい て | ン ラ さ 見 
WW し ニム ム れ せ M 
Im た れ が を が て 
ID 人 を 上 に と せ と は の の そい 4 
Im と 失 作 い カ て の ひで り ノ る く 』 
m 思 会 第 ま ラ や 力 と "だ ク M れ ョ m 
m2 に 』 よ し | ろ る を つこ フロ Z だ 』 
も と ラジ ト ク う 上 MCU の て 
ト II MI 上 は MM BB IM 8 上 Bl 

還 変 数 リス ト 
M1$S,M2 お …… ロ ポッ ツ ト の デ 
ー タ 


人 @ 岩 。 真横 か 
ら 腕 で 人 破壊 し 
な いと ダメ 。 


@ び ロロ ボツ ト 。 
手 に 何 か 持 つ 
て る み だ い 。 


「11 $= ニ リマ タタ ャ 2 9 0+CHRS(G5 う + "ロタ "+CHR$( て の)+CHR$( 15)+・ へ 較 計 上 科 " : MG ニ "1 元 元 1 く く "TCHR ま て 17) 
1 ご $= ト 1 ビ $+"a"+CHR$ て の)+" 計 "1+CHRS(B)+CHR$S( う +CHR* ま (8)+CHR$ て う +" 半 ":R ま ニッ エー エロ エロ U※" 
KR 1 $=CHR ま (1 ) う キリ ィ T ェ エロ ェ OTP" : RG$=R$ す 民 1$:CL$=STR TNG ま SCCHR ま (の ), 16) : ME ニ 3: ROD ニ の 
CONSOLECS の , GS の, ご 4 , GH : =5 の の 9 の: IX ニコ 9 : 1Y=3 : ROD=RO+ 1 : RC= の : NU= の : TEMPD ア : CCOLOR3。 の 
PR INTCHR$(5):"H エ ーSCORE :": 日 : TRB(55 ) : 
FORL= の TO19+RO^ ら 水 G・ RX=TNTCRNDC 1 )※ マ 8)+4: RY=INTCRND( 1 )*19)+3: CURSDRRX RY 
PRINT"S "POSITTIONRxX BS, RY*SB: FRTTERN[ ら 1], RG$: NEXT し : IFME= ロ THENS24 

SCORE* :S:・ 
FORN=4TO76: FORZ=3TQSG: IFCHQRRCTER (MM, プ ="* "THENNU=NU+ 1 


: BOXE③]7, 7 684 , 193 


1@ NEXT, ト 1: CURSORG の 9, 19: PR INTSPRCE$( GS+LENC STR$(RO )+STR$() ) 5 : GRRPHO 1 つ 3・ CCOLORG 
1 1 POKE SBS ら , の : GETR: POKE ま BS ら 8, 16B: ON ロン ロー1GOTO13, 14. 15 

1 選 Yー1: メニ ワウ :P$=CHQRRCTERS(FX, MY+1):POSTTIONMxB, MY*8・ イニ イー1 の 9: GODTO16 

まま ペニー1 : Y= ニ の :P$=CHRRRCTER$( MXー1, MY): POS ITIONMX*S, MY*8: イニ イ -ー 1 の: COTO16 

1 人 4 ペー1: Yー の :P$= ニ CHRRRCTER* ま (MX+ 1. MY): POS IT IONNMx*S、 MY : イニ イー1 ロ ・ GOTOD16 

まさ D テー1 : X= ニ の ・P$= ニ CHRRRCTER*( て MX , MYー1 ) : POSTTIONNx*S, MY*8: イエ ミイ ー1 ロ : GOTOTG 

16 CURSOR ら の, の: PR INT "SCORE : ":S: CURSDR38, の: PR INT*TIME :・:T:" 

も で TFCFK く うす CX > プ 5 う + て MY くら )+ す (MY >88 ) THENNIUS 1TC ッ ー ビ 5・ : ME=MEー 1 : RO= ニ ROD 一 1: GOTO4 
1 PRTTERN[ の 1 一, CL$: ト 4X=NMIX+X: MY マニ MY+Y: TFP$="* "THENNMUS C+BO": RC ニ RC+ 1 ・ GS+ 1 の 

1S9 POSTT IONNIX※ ポ 8, MY※B・ IFPDTNTCFHx*8, MY*8 )=GTHENIUS 1C"ーE5・: ME= ニ MEー1 : RO= ニ ROD 1 : GOTD4 
ご @g PaTTERNES]-8, 1$:POSTTIONHMx*8, YS8: PRTTERNL ら , 1 18 は, Mo$: IFRC=NUTHENGOTO ら 2 


ご 1 CURSORNMX , MY: PRINT" ": US TCR の " 
どど ご CURSOR38 , 1 ら : PR INT "Ok !" 


: GODTO11: REM 識 蔽 PROGRQM No . 1 Uer4.4 bgT.N 議 議 
: MUSTC "RGBCDEFGFEDCBQ" : FOR エ =1TORD* 1 の 9: MUSTC"+Q ら " 


4 マデ ラキ 『 ノ 1 の : CURSOR ら SS, 18: PR INT "SCORE+TIME*: 丁 : "xi: ROD "テッ:S: NEXT ET: MUSTCTRB* : GOTO4 


ご 4 CURSOR35 16: PR ENT "GaQNE OUER" : ト KUSTC ッ ーー ロー ビー ビー ロー ビー ビーDーCRRR+ ナ C" : 1FS >HTHENH= ら 


どら CCOLOR4, の : CURSODR3@, 15: PR TNT "Yo uF SCOPEBY:S: Vpts":HIUSTC"RGR・ : = の : GOTO3 


RS.R1$,R2S…- 岩 の デー タ 
ME…… ロ ボッ ツ ト の 数 
RO…… ラ ウン ド 数 


MX…… ロ ボッ ツ ト の XX 座標 
MY…… ロ ボツ ト の Y 只 標 
(の 砕 び れ だ 岩 の 数 

NU-…… 表 示さ れ だ 岩 の 数 


田 プ ログ ラム の 説明 

1- 3 ロボ ポッ ト 、 岩 の 設定 
4-5 初期 設定 

6-- / 岩 表示 

8 ラウ ンド 開始 の 表示 
表示 され て いる 岩 の 
数 の 確認 

11 キー 次 力 
ロボ ッ ト 移 動 

16 スコ ア 、 タ イム 表示 
1/ 画面 の 端 に まだ と き 


の 処理 

18 ロボ ツ ト 消 去 、 岩 を 
取 つ だ か の 判断 

19 岩 に ぶつ か つ だ か の 
判断 

20 ロボ ッ ト 表 示 、 ラ ウ 
ンド クリ ア の 判断 

21 サウ ンド 


22Z<…23 ラウ ンド クリ ア 処 理 
24co250。 ワー ム オ ーー 利 理 
一 チ エッ フ ボ イン ト 

数 少な い MZ-2000 系 の 1 画面 
で す 。 グラ フィ ッ フ も よ ぐ 、 ロ 
ボッ ツ ト の 動か し 方 も 独創 性 が あ 
り 、 け つこ う 遊 べ ま す 。 

25X680 行 を 最大 限 に 使用 し 
て いま すし 、 特 に チエ ッ ツク ボ イ 
ント は あり ませ ん 。 ロ ボツ ト を 
増やし だ い 人 は 、3 行 の ME ニテ 
う を 適当 に 変え て みて ぐだ さい 。 

(エイ キチ ) 


要する に こん な “ウニ ウニ 会 話 ′ を 募集 し ます 。 


と ACE トマ ト > こ の 会 話 の お か し さ を 説 明け する と ね 、 よ ぐ 落 語 で ある で し よう 、「 へ え 」 と か 「 カ ツッコ イー」 と カツ ジャ レ 


ア て 人 える や つ 。 あ の 落語 を も つと ナン セン ス に し た と ころ が お か し い の | 


そ モク グラ の 六 色 に 法 意 ./ 聞 ケ ー ル 上 奈 計 で な 6 し ろ さ / ア 


:COLOR1 5 
W"BM 


4 


ぷら)ー 


・ ウー て で て でき の SS ロー ンーSS ロ の きつ で の の 選 
2 ・・ 


= へ OH ーー ウォ デー の 


) = 荘 G の HHS 愉 1 1 の 思 志 四 
ローー+ エ Io の 1 で よい 


〇 な の ーー ロロ の d 〇 の SS 宙 
ーー ベー ジジ ベジ 1 ーー の ーー 


2 


( 


A 
B 
2 
P 
) 
9 

。】 ) 
7 
F 
L 
) 
N 
N 


・ COo 。 幸 …・ 
C ら < 


SF 
"ーー の ッッ ー 
(つう 


で cotS ウ FOO の 6 の 1 の の ・ の 
っ 2 


+ つ デベ OO ら の で 1 の (の ドウ (の 尽く っ 2 キ の ・・ 
ーー * 


注 ・ こ の プロ グラ ム 中 に は . (ピリ オド ) は あり ませ ん 。. の よう に 見 えて も 、 そ れ は , (カン マ ) です 。 


MSX の ハー ド に あわ せ た ル ー ル 
お な じみ あの手 グラ た だ き 。 で も 、 よ 
つう の や つと も よろ と 通う 。 

まず 、 モ グラ は 4 ヵ所 に し か 現れ な 
ぃ い 。 つ まり 、 上 下 左 右 の 中 央 に ある マ 
門人 IE が わり 0 だ で MS 
マイ ナー チェ ンジ の よう に も 思え る け 
と ど 、 チ テン シュ キー の か わり に カー ソル 
・ キ ー の つい て いる MSX に あわ せ だ 
も の だ ろう 。 

だ か ら 、 使 用 する の は カー ソル ・ キ 
ー。 上 トト 左 大 の どこ か に モグ ラガ が 現れ 


(8 BB 8 BR  W 8 8 B 思 】 


# る 
2 | 4 続 し 方 ア 
IA 拓 生 和 だ の りら 』 
ヽ な 大 も 0 ペ W 
9 | 賠 3 ソン 6 < 
大 シ の 角 * 富 い ュ コ 0 は M 
和樹 ツ 聡 山 ン ム 
し 4 の 県 うう 
4 に 装っ 8 
を に うた 上 
2 っ て と 学 邊 
者 II 
mm に い 旧 は 
m 載る か ク 生 - 
邊 22 8 の 「 
』 た 最 た ろ ス 去 
後 の で 年 W 
し 。 う 2 に し 
W ほぼ C 
上 か 今 く F 邊 
# わ て で し | 
ST ここ 


=15THENA=2 


: GOT039 

LOR8 :GOTO89ELSESC 

.BF : PSET( 9 , 96 ) , 1 
TO36 

、 "GAMEOVER" : IFST 


、B8 .89,B8.89.B8, 
ュ 32.1.1D 


GOT089 


た ら 、 す ば や くそ れ に あっ た だ キー を だ 
た くべ で し 。 お 手つき は 減点 。 
@ ゲ ー ム オー バー に は 2 種類 
それから 、 時 間 制 了 良 も ある 。 う まく 
モグ ラ を だ た だ いて いけ ば 、 得 点 に 応じ 
て 時 間 も 伸 びる けれ ど 、 う か うか し て 
いる と 時 間切 れ ゲ ー ム オー バー。 こ の 
と き の *GAME OVER" と いう 表示 は 
青く な っ て いる 。 

赤い 表示 の GAME OVER" だ っ た 
ら 、 そ れ は 時 間切 れ で は な く 《 く て 、 こ の 
『 モ グラ タタ キ 」 独特 の ルー ル の せい 
5 

つま り 、 こ の ゲー ム で は クル クル 変 


マモ グラ の 顔色 に ご 用 収 。 中 央 の 色 こ と 同じ 
だ つた ら 人 危険 。 を だ いち や ゃ だ め / 


一変 数 リス ト 
X( )…… モ グラ の X 座 標 


間 
ご O Te スコ ゴア 
A…… 中 央 部 分 の 色 
に 2 ytis モグ ラ の 色 
B…… モ グラ の 出現 する 位置 
se 
一 プ ログ ラム の 説明 
10-20 初期 設定 、 画 面 設定 、 
スプ ライ トド 定義 
30 時 間 ぎ れ ガ が“ 
40 モグ ラ の 位置 、 中 央 部 
分 の 色 決 定 
50 中 央 部 分 、 モ グラ 表示 、 
キー 入力 


60 あだな つた か マ 

70 スコ ア 表 示 

80 ゲー ハム オー パー 

90 ズ ステ メラ イド ト デ ー デ ーッ タ 
モグ ラ の 位置 の デー タ 

圏 チ ェ エッ クボ イン ト 


で も だ の し く ぐ 遊 べ る ゲー ム な の 
で す が 、 ひ ね ぐれ 者 の 私 は 、 以 
下 の よ うに 改造 し て み ま し た 。 

20 行 ー : FOR 1= ニ 1T0/ 
ら ST 所 P 選 ミ を FOR 1『 
O8 

40 行 の B= ニ FNR (4, 1) 
x ォ ジー1 : を B= ニ FNR (8, 
1 ) 

90 行 の 3 行 目 - ら 1, C1, 
より 後半 を 、1 42, 38, 1 
おら 3 1 9 /8, 1 
ら 2。 1 4 イ 14 を て 18, 
1 の 02, 1 18、 1 の 2 /8, 
1 の ⑦2, 3 お 8 
ご うす る と 、 モ グラ が 中 央 部 分 
分 を の ぞ く ぐす べ て の 場所 に 出現 
し ます 。 キ ー は カー ソル の み で 
す 。 や だ らむ ず か し ぐ な り ま す 。 

(エイ キチ ) 


わる 真中 の マス 目 の 色 と 、 今 た た いた 
モグ ラ の 色 が 同じ に な る と アツ ウ ト に な 
9 穫 し 半 う の だ 。 

だ か ら 、 い つも 真中 の マス 目 の 色 を 
気 に し つつ 、 モ グラ が どこ に 出現 する 
か 、 そ し て を の 人 色 は 真中 の 色 と 同 じ で 
は な いか 気 に し な が ら 、 や っ て いく 〈 こ 
と に な る ね 。 


この 新 ル ー ル が ひと つ 入 っ た だ け で 


緊張 感 が ズ ッ と 違っ て きた 。 


江 ミ エッ ト / 稼 < ゅ みち ゃ ん トマ ト > ウ ニ ウ ー 会 話 シ リー ズン その 2「 ご この イラ スト だ れ が 書い た の ダン プ ' そ れ は ステ レオ に つい て る や つ 
意味 が あり そう で な さそ う で 、 頭 が ウー ウニ し て こる で し よ 


あの 


だ ろう で れ は シャ ン フ ノー 1 


ZZ 


WW ン 半 000g- グ 甘 ソ と ン と ロン 司 邦 / @ 


座 / 包 チチ こ ず る 学 所 謝 を な だ め つ つ 上 星 者 歴 を 三 せ / "====ーーーーーーーーーーーー、 


ポシェ ッ ト 4 月 号 P81 参 照 

「 あ っ 、 こ れ は 田中 学 だ ろう /」 
誰か が MULTI 8 の 常連 投稿 者 の 名 
を 日 に し た 。 そ の と お り 、 こ れ は 田中 
学 の 作品 で ある 。 今回 も また や ペン ネ 


H 

4 M る 注 
ま けけ / ・ ハ - 
『 し ほぼ ほ ロ 
5 1 な 5 名 
> る 40 全 1 
/ ま た で 」 で 
す 7 も 1 も WM 
2 ら あ べ 」 嘆 
の と ころ を マジ ッ ク て 塗り つぶ し て い 「 ら て ポ ネ 0 い 
た よう だ っ た 。E う や 6 キミ は プラッ 還 還 計れ 大 | 
クリ スト の ほう に 移さ れ た よう だ ね 。 ノ おま の 05CTS・ こ - 
待遇 悪く な る よ ( う を です)。 ウエ カト 『 RCIST 全 お 
と に か く 、 き わ め つ き の ム ズ さ ン Tn WW We ny 。 
II I MI I 』 8 BI 5 I 』 II 』 』 』 ) 


点 、 線 、 丸 、 三 角 …… の 
ラグ し が か が 出 て こ な しい * 彼 の 作品 En ロ ( ※ も の 。 
か どう も この へ ん は 重力 場 が 異常 に な 


ー ム を 変え て いる 。 あっ だく 還 育 く て 小さ な 小 き な ドッ ト が キミ の っ て いる よう で 、 キ ー も いっ だ ん 押し 
ころ ペン ネー ム を か えて いる と 名 簿 が 字 宙 船 。 こ の ドッ ト を 5 以外 の [091 て し まう と を の 方 向 に どん どん 加速 し 
泥 乱 する じゃ な いか が ./ この あい だ 、 キー を 使っ て 上 下 左右 な な め に 動か し 、 て し まっ て と りか え し が つか な く な る 。 


ゆみ ちゃ ん が 名 簿 整 理 し な が ら 田 中 学 


一 変数 リス ト 
AB…… 自 分 の 座標 
SC う Seieke スゴ ア 
門 ト の Me スニ 
( 二 F…… 加速 度 
D) F な 惑星 重力 
Y, と …… 上 自分 の 位置 の 判定 用 
| PGI INP 用 
較 プ ロブ ラム の 説明 
1 初期 設定 
2 画面 作成 
上 スコ ア 、 ハ イス コア 表 
志 か 
4 5 キー 入力 
6 自分 の 位置 に よる 判定 
/ 自分 の 秘 動 
9 一 16 苔 キ ー 入 力 に よる 噴射 
災 の 表示 
17 着陸 成功 


16 2 オー mL 理 

19 ゲー ム 開 始 時 の 入力 待 
ち 

一 チ エッ ン フ ボイン ト 

上 自分 が 小さ いう え に 色 が 青く 
て 見 に ぐい ね 。 ら ぢ 行 と / 行 の P 
SE T (A, B), の あと の 数 字 
を 4 に し よう 。 あ と ゲー ム が ち 
よ つ と 難し すぎ る 。 着陸 する 
惑星 を 最初 は 大 きぐ くし て 、 面 が 
進 び に つれ て 小さ ぐす る よう に 
し て みよ う 。 ま ざ ず リ ナン バー を 
がけ て 20 行 の FORZ= テ の ⑦TO 
ら の ら を O 〇 に する 。 次 に 170 行 の 
ら C= テ SC†200 : の あと を 【 
F 0O=5THEN GOTO 
ご 20 の ELSE.0 ミ 0ー5 :G 
OTO20 に する 。 つ づい て 190 
行 の INKEY$ ミ =\5?THE 
N の あと の 20 を 15 に し ます 。 そ 
し レ て 次 の 1 行 を 加え れ ば OX。 
15 0=50 263 


〈 着陸 で き 

の ee 5 
e これ が キミ ん 、 こ れ は も 2 
の 宇宙 船 。 だ ドッ トレ ベル の 
だ の ドッ ト 。 話 で すね 。 


中 央 の 水色 惑星 に 着陸 る せよ うと いう 


画面 の 外 に My ら ゲ ー ム 、 オ 一 エー。 キ 
ー を 押し て いる と 減っ て いく スコ ア が 
0 に な っ て も ゲー ム オ ー バ ー だ 。 リ ンプ" 


e 惑星 。 実際 の 画面 は も 「 ー レイ は [5 キー。 
つと 小さ いん だ よー/ 


惑星 に 着陸 する と 音 が 鳴っ て ボー ナ 
ス が 加算 きれ る の だ が 、 た だ 惑星 に ぶ 
5 か っ の だ た だ けり で は 素 思 り し て し まう こ 
と が ある 。 Si 


1 CONSOLE 9,25,9,1:CLS 3:WIDTH 89,25:CLEAR:COLOR=(3,9):DEFDBLA-F:GOTO 19 


| 2 CLS 3:LINE (299,49)-(439,159),3,BF:FOR Z=9 TO 5:CIRCLE (320 199) ,Z,5。 。。.5:NEXT 


・A=59:B=59:C=5:D=9:E=9:F=9:PSET (A,B) , 1 

3 COLOR 6:LOCATE 5,.9:PRINT "SCORE":SC:COLOR 2:LOCATE 26,9:PRINT "HI-SCORE" :HI 

4 I=INP(8):IF I<>53THENSC=SC-2:IF SC<THEN 19 ー 

5 IF (1>57 OR 1 く <49)THENI=53 ELSE PLAY "01C64":SC=SC+ 1 

6 ON (]-48) GOSUB 8.9,19.11.12.13,14。15,16:Z=POINT (A-C,B-E) :Y=POINT (A+C,B+E): 
F (Z=5 OR Y=5)THEN 17 ELSE LINE (A-1.B-1)-STEP (2,2),-3x(Y=3) ,BF:C=C+D:A=A+C:E=E 
+F:B=B+E: ITF (Z=-1 OR Y=-1)THEN 18 

7 PSET (A,B),1:IF Z<>3THEN 3 ELSE C=C+SGN(329-A):E=E+SGN(10-B):GOTO 3 

8 PSET(A+1,B-1) ,2:D=-1:F= 5:RETURN 

9 PSET(A,B-1 ),2:F=1:RETURN 

19 PSET(A-1,B-1),2:D=1:F=.5:RETURN 

11 PSET(A+1 ,B) 、2:D= -2:RETURN 

12 D=9:F=9・RETURN 

13 PSET(A-1 ,B) ,2:D=2:RETURN 

14 PSET(A+1,B+1),2:D=-1:F=- .5:RETURN 

15 PSET(A,B+1 ) ,2:F=- 1 :RETURN 

16 PSET(A-1,B+1) 2:D=1:F=- .5:RETURN 

17 FOR Z=1 TO 5:PLAY"05C32" :COLOR=(3.5) :PLAY"D32" :COLOR=(3,9) :NEXT:FOR 2=9 TO 28 
9STEP19:COLOR 2:LOCATE 19,16:PRINT "* ホ *- ナ ス "ZEPLAY"C64D64":NEXT :SC=SC+299:GOTO 2 
18 IF SC>HITHEN HI=SC:COLOR 22:LOCATE 29,19:PRINT "YOU ARE TOPI!" 

19 COLOR 23:LOCATE 29.15:PRINT "HIT [5] TRY":SC=56: IF INKEY$= "5"THEN 2 ELSE 19 


全 (OOWND な の な か ID み に は お ず の レガ つ お な ぁ 。 ま ん 中 の や つ に "あお っ だ ぁ 7” と 思っ で も 、 み すっ だ け で あ だ っ て な 
人 M02 要 いん だ 。 ご ざ ぐ す キ ー 操 作 し て いる と 、 へ ん な ほう へ いつ ちゃ うし … 


送ら れ て 来 し プロ グラ ム 
封切 リ り 見れ ば ポシェ ッ ト 分 


すぐ さま クー が RUN す る も 
ちょ っ ゥ と どこ れ で は ジム ム ム ム 
ボツ し よう か ぞう し よ か 
迷う 門出 に 福来 た る 
飛ん で いで た る 例 の 人 
山科 さん の 推薦 で 

添削 担当 に 回 され た 


と II BE 8  W 8 8W BB IM 8 W Im W 2 


誕生 日 が めで た い 


| 
9 


「 
| | 
き =- 五 - を 
3 - た を 
委 0 
と と 始 
な め 
いく た 
の 
は 


ネオ ャ バカ 


ーー こぐ へ ヽ 
へ 醒 中 。ー は は と の ゆとり 頭 へ いい へ OU で は りさ な 


zf 1 


へ は 中 科 選 か の は ご ざす 感 みよ 
> 。TmoomーS 半 財 
ーー rv 下 財 涯 弄 餅 さ 見 叶 家 コ 四 ロ ゴビ 


ぴい こう 
xt S 普 pHS 芋 湯 。 は ご 中 三 せ ー ば り で 


ww き 計 
日 B HI 』 I HI H HI BI 上 H BI 1 8 BI B 8 BI BI WI Bi 


SB 計 ーー ビ ン 


の 1 1 1 1 IL IL 1 LIL 1 1 1 II II Ii 2 


ーー 


と いう わけ で 、 今回 は MSX の 「『ICE B 
LOCK』。 キヤ ラフ クダ は か わい いし 、 や る 


うと し て いる こと は お も し ろ そ うな ん だ け ・ 


ど 、 な ん と な こく イマ イチ の 感 を まぬがれ な 
い 。 

プロ グラ ム を じ つ く こり 見 て いる と 、 催 か 
に 苦労 の あと は し の ば れる けど 、 い わ ゆ る 


* ス パ ゲ ツテ ィ ” プロ グラ ヲ ラム に な つて いる 。 


それ に 、 ゲ ー ム 作り の うえ で の 詰め も ちよ 
つと あま い 。…… これ で は 、 ち よこ ちよ こ 
直し て だ ん で は 大 変 だ 。 ど うし よう か …… 
山科 さん に 白い 目 で 見 られ つつ 、 災 切り を 


っ / 
5 の 5 
アル ツタ 


過ぎ る こと 2 週間 。 つ い に 、 私 は 立ち わあ が 
り 、 涼 ペン を 提 つ だ 。 で そして“? 
「 こ の プロ グラ ム を MSX に 秘 植 し よう /」 
ん これ は 最初 か ら MSX 用 だ つて 
その と お り 。 要する に 移植 する よう な つも 
り で 全面 的 に 作り 直 そ うと いう わけ な の だ 。 
ざ て 、 その つい で ゲー ム を ブロ グラ 
ム す る うえ で の 基本 ルー ル み た だ いな も の を 
押さ えて いく こと に し た 。 つ まり 、 ご この 六 
削 は ゲー ム 作 り の 入門 編 に も な る わけ だ 。 
この 「『 ゲ ー ム 作成 法人 門 」 は 、MSX 以 
外 で も 同じ こと だ 。 他 機種 の か ユー ザー の キ 
ミ も ぜひ 、 参 考 に し て は し い 。 


19 COLOR 15,1,1:SCREEN2 ,2:OPEN"grp: "AS#【1:DEFINT A- 
/ 


29 R=RND( -TIME) :SC=9:MO=3:RO= 1 


49 FOR I=9@ TO 2:A$=" "FOR J=9 TO 31:READB$: A も =A$+C 
HR$(VAL("&h"+B$ も )):NEXT J 
SPRITE$( 1 )=A$:NEXT 


DATA 7f ,c9,bf ,bf ,bf ,b7,bf ,b7 ,b7 ,b7 ,b7 , b3, bf , bf 。 
の 


DATA fe,93.fd,fd,fd,fd,fd,fd,fd,fd,fd,fd,fd,fd。 
fe 


DATA 97.1f,3f,3f 7f。7b.f5.ff。ff。ff。6eGf, イ 9 人 1 イイ 
57 1 


DATA e9.f8.fc,fc,fe,de,af,ff。ff,ff,f7。9f,ff,ff 
。 86G 


DATA 9C,92.93.9f,3f,7b,75,ff,ff。eG4.G9.f9.f8。7C 
ュ づ f 


ご 〆 の 


こん な こと は サブ ルー 
チン に する べから ず ! 
は っ きり いっ て 、 百害 
あっ て 一 利 な し 


この 行 を ひと 目 見 て 何 
を や っ て る か わか っ た 
ら ス ゴイ 。 ス プラ イト 
の 初期 仮 置 を 乱数 で 作 
っ て 表示 させ て る の だ 
けれ ど 、 ち ょ っ と 見 た 
目 に は と て も わか り に 
くい の だ ! 


ーー 4@e 


すべ ぷ て を IF 廊 で 作っ た 
移動 ルー チン 。 で ぜひ 、 

パラ メー タ を 使っ て ス 
ッ キ リ や り た いも の ! 


こう いう どこ ろ は パラ 
メー タ と FOR 一 NEXT 
を 組み あわ せ て 一 体 化 
すべ きだ ! 


ゲー ム オ ー バ ー の と き 
に し か スコ ア を 出し て 
くれ な い 。 さびしい じ 
ゃ ん ? 


この へ ん の サブ ルー チ 
ン の 使い 方 は まず い 。 

添削 後 リ スト の 1550 行 
以後 を 見 て 研究 せよ ! 


_329 


ーー 恒 


149 DATA 39,49,cC9,f9,fC,de,ae,ff,ff,27.97,9f。 1f ,3e 
* 注 栓 ま 人 @  、 

169 " ーーーーーーーーーーーーーーー 

179 COLOR 7:FOR 1I=9 TO 3:PSET(9,29+1),9 

189 PRINT#1 ," rm r コ エコ エコ エー ビー デビ コ エイ ィ " 


199 PRINT#1," 「 1 ビー ト HH1 1 昌 上 の " 

299 PRINT#1 ," ーー プ ト エ プ エーーー コレ コレ コレ コーLJ "ENEXT 
<Z19 FOR I=9 TO 1:PSET(199+1I、189+1),9:COLOR 7:PRINT 
#1 "HIT SPACE KEY !!":NEXT 

229 PLAY"t255v15o4ddggfgaabbo5ddceo4bbbafgedddd" 
239 IF PLAY(9) THEN 239 

249 PUTSPRITE 1,(9+I,89),8:PUTSPRITE 2,(9+I,116),1 
1:PUTSPRITE 9,(9+1I,152),7 

259 1I=I+16: IFSTRIG(9) く >- 1THEN249 

269 " ーーーーーーーーーーーーーーー 

265 RESTORE 899 

279 CLS:LINE(9,9)-(249,176),12、B:LINE(15,15)-(225, 
161),12,.B:PAINT(19,2),12 

289 " ーーーーーーーーーーーーーー 

299 BX=9:FOR 1=1 TO 13:READ BY 

399 BX=BX+16:BY=BYx16:LINE(BX,BY)-(BX+16,BY+16) ,RO 
+1.BF:LINE(BX+2.BY+2)-(BX+14,.BY+14),1,B 

319 NEXT:GOTO 419 


| MX1=RND( 1 )x13+1 :MY1=RND( 1 ) x5+ 1 
MX=MX1x16:MY=MY1x16:RETURN 
PUTSPRITE 1.(X,Y) ,8:RETURN 

4 PUTSPRITE 2, (MX,MY) , 1 1 : RETURN 

月 PUTSPRITE 9,(IX,IY) ,7:RETURN 

| LINE(96,9)-(111.15) ,1,BF:RETURN 


XX=16:Y=144:IX=32:IY=128 


429| GOSUB 339:GOSUB 379:GOSUB 389:GOSUB 369:GOSUB 


44 S=STICK(9 ) 


5 人 | IF S=7 THEN IF POINT(X-1,Y+8)=1 THEN X=X-16 

69| IF S=3 THEN IF POINT(X+17,Y+8)=1 THEN X=X+16 

79| IF S=1 THEN IF POINT(X+8,Y-1)=1 THEN Y=Y-16 
| IF S=5 THEN IF POINT(X+8,Y+17)=1 THEN Y=Y+16 

599 GOSUB 369 

519 IF X=96 AND Y=9 THEN 719 

529 IF 9>ABS(X-MX)AND 9>ABS(Y-MY)THEN 718 


Kixt8。1Y-1) 


加 1 IF X-16=IXANDY=IYANDC1=1 THENIX=IX-16 
IF X+16=IXANDY=I YANDC2=1 THENIX=IX+16 
IF Y-16=IYANDX=IXANDC3=1 THENIY=IY-16 
IF Y+16=IYANDX=IXANDC4=1 THENIY=IY+16 
649 GOSUB 389 

659 IF IX=96 AND IY=g THEN 865 


689 IF MX>150RMX<299 OR MY>150RMY く 145 THEN MX=MX+S 
GN(X-MX )x4:MY=MY+SGN( Y-MY ) x4 

699 GOSUB 379:GOTO 449 

799 ′ ーーーーーーーーーーーーーーー 
MO=M0-1:PLAY"t255v15ggf eccc" 

IF PLAY(9) THEN 7289 

IF MO<>9 THEN 419 
GOSUB 1999 
引 IF SC>HS THEN HS=SC 
8 介 | LOCATE 16,.4:PRINT "GAME OVER" 
LOCATE 14,.8:PRINT"YOUR SCORE" :SC 
8#9| LOCATE 15,13:PRINT "HI-SCORE" :HS 
中 | PLAY"t255o3v15ggf eccc" 
29| IF PLAY(9) THEN 829 

| LOCATE14.29:PRINT"HIT SPACE KEY" 


| IF STRIG(9) THEN 19 ELSE 849 


% 


865 RO=RO+1:IF RO=1 1 THEN 1969 

879 SC=SC+RND( 1 ) x*199*RO:PLAY"t255v15o5ddgefbbbo6cd 
dco6aabbbo4" 

875 IF PLAY(9) THEN 875 ELSE 279 


689 " ーーーーーーーーー ニ ーーーーー 

899 DATA 3,5,.6,7,6,6,5,4,9,9,.8,7,5 
999 DATA 7,7.7.7.7.6.5,5.7,4.3,4,5 
319 DATA 7,7.7.7.7.6.5、5,、5.5,.3,3。3 
929 DATA 2,.3,4.5.6.6.6,7,3.5,4,3,2 
99B DATA イア ッッ イイ アル 7 イア YY 、 多 5 
949 DATA 7,3.6.9,2.8.4.9,3.1.5,。7,8 
959 DATA 7.6.5.4.3.3.5.7,.2.4.3,6,6 
969 DATA 1,2.3.2。1.3.3。4.5,4.3。8,8 
979 DATA 4.6,。5、^,3。3.3.3、6、2.3。8.6 
989 DATA 3。1.F 7.4.9.6.3.1.9.2。4,3 


_996 ・ --------------- 


中 GOSUB 1949:GOSUB 1999:FOR I=9 TO 21:LOCATE13, 
RINT" ヤ ッ タネ セ ~ ン メン クリ ア -" :NEXT 

7 GOSUB 1649:FOR I=9 TO 199:COLOR ,RND(1)x16:NE 
:CDLOR 15.1.1:END 


ーーーーーーーーーーーーーーー 


一 変数 リス ト 


(ee 以 当 ア 
MO…… モ ンタ の 数 
RO…… ラ ウン ド 数 


XY…… モ ンタ の 座標 

MXMY…… モ ンス ター の 座標 

AIY…… ア イス プロ ッ フ の 座標 

C1.C&C3.C4…… ア イス プロ ッ ツン フ が 次 に 
進む 場所 の 色 

SW コア 

還 プ ログ ラム 解説 

10~ 20 初期 設定 

30^- 50 デー タ 読 みこ み 

70-140 キヤ ラフ タデ ー タ 

1200200 オラ クア ョ ッ グ 

270 画面 初期 化 

290 面 デ ゲー タ 読 みこ み 

330-340 モン スタ ー の 最初 の 座標 

360-390 キャ ヤラ クイ の 表示 

440 一 490 キー 入力 判定 

910 一 520 判定 

970--650 アイ スプ ロッ の 秘 動 用 判定 

660 一 690 モン スタ ヤー の 移動 用 判定 

710 一 7/80 モン タ が 死ん だ と き の 負 理 

750-840 ゲー ム オ ー バ パー 処理 

6865 一 675 面 フ リア の 負 理 

690 一 980 面 デ ー タ 

1060~1070 全面 クリ ア の 処理 

田 参 考 に し だ も の 

「 マイ コン BASIC マ ガ ジ ン 」84 年 6 月 号 の 

福吉 の シグ デー ビー ソフ トド ラッ ピ ニ ティ 


和 レ が を >4②⑨-C*。 
て こう らら う きい の 。 


め ヒ し が で > 々 
で dd。 ゴロ シン シ 


0000008 


2 の 2 2 SASC2c2A0AA2022202S の cro cy 和 MA 
人 00200 HH23082820202300220322280002RH2023H8SH02 人 2 2 


ます 、 
ゲー ム ・ シ ナリ オ を 


例 の 山科 さん が この ゲー ム を 特に 推薦 し 
て いた の は 、 登 場 す る キヤ ラノ フツ の カリ ワイ 
さと 、 単 刀 直 入 な る シナ リオ に ある の だ 。 
も う 一 歩 練 ら れ て いた な ら ク フー ガー 発 で 
正式 に 採用 決定 を し た だ ろう 。 以下 が 送ら 
れ て きた シナ リオ だ 。 
e モン スマ ツー (黄色) に つ ひ ま ら な いよ う 
に モン ( 了 色 ) を 動 ひ し 、 ア イス プロ ツ ッ 
ク を 上 の 黒い 部 分 に 入れ て くだ さい 
@ モン ツ は か ガ べ は 通り ぬけ られ ませ ん 。 モ 
ンス ター は か べ を 通り ぬけ て きま す 。 
@ アイ スプ ブロック を 変 な と ころ に も つて い 
こぐ と 動 ひ かせ な こく な り ま す (や つて みれ ば わ 
か り ま す )。 も し 動か の せな こく なつ たら 、 目 分 
で 死ん で くだ さい 


ガッ ナリ 作ろ う ./ 


これ ら の 点 を 改良 し た シナ リオ は 炊 の よ 
うに な る 。 

『ICE BLOCK』 の 
ゲー ム ・ シ ナリ オ 業 
【 登 場 人 物 】 

$ モ ウツ ダー パプ レイ ヤー 分身 で カテ デン ル 
キー ガ ジ ヨ イス ティ ッ で 動か す 。 最 初 が 
ら う 3 人 いて 、1 面 フ リア する ご と に 1 人 ず 


つ 増 える 。 モン スタ ー と 衝突 する と アウ ト 。 


e モン スタ ー… 敵 。 コ ン ピ ユ ー タ 側 で 勝 
に 操作 し 、 モ ンダ に 近づい て ぐる 

e プロ ッ フ …… 不 可 恨 物体 

* アイ ス ブ ロ ッ フ …… モ ンタ に 反発 し て 動 
不可 上 議 生命 体 。 これ を 画面 上 方 の 黒い 


e@ 上 の 黒 の 部 分 に モン タ を 入れ る と 死に ます 四角 の エリ ア (バミュ ユー ダ ・ ス クエ ア ) に 


e 10 面 まで あり ます 
この うち で ゲー ム を 殺し て し まつ て いる 
の は 炎 の 3 点 だ と いえ る ソ 


④① モ ンス ター が 壁 を 通り 抜け ら 
れる 
② ア イス ブロ ッ ク を 運ん で いく と ころ が 中 
央 で な こ 、 画面 の バラ ンス が 悪い 
③ 面 の 構成 が 単純 で パズル 性 に 欠け る 
この 他 に も デモ か ら ゲ ー ム に 物 る と き に 
デモ で 出 て いた キヤ ラフ ツマ が その まま 表示 
され て いる な ど 、 細 か な 欠点 が 数 多く 見 ら 
れる 。 リ スト ー 1 が この プロ グラ ム な の だ 
が 、 全 体 的 に 行き あたり ば つた だり 。 ち ゃ ん 
と 動い て いる の が 不思議 な ほど だ 。 


運ぶ と 1 面 終 Y と な る 

7 和 ジ スト レデ テラ ショ ヨン ) 

IOE BLOOCKj ど 大 きく グラ フイ ッ プ キ 
ャ ヤラ クタ で 、 ま た 画面 の 下 亡 に "HIT SF 


ACE OR TRIGER」 と 表示 する 。 ス ペー 
スキ ー ガ トリ ガー ボタン が 押さ れる まで モ 
ンス ター、 モ ンタ 、 ア イス プロ ッ ク を 画面 を 
側 か ら 右 側 こ 走ら せる 。 ご この 時 は B.G.M. 
を 流す 

【 操 作法 】 

@ ス ペー スキ ー を 押し て ゲー ム を 始め る と 
カー ソル キー で モン を 動か ひ す よ うに な る 
@ に トリ ガー ボタ ン を 押し た だ とき は 、 ジ ヨイ 
ステ イィ ッ ク で モン を 動 ガ す 


* 移動 可能 な 方向 は 上 、 下 、 を 、 右 の 4 万 | 
向 で 、 そ れ 以 外 の 入力 (斜め な ど ) は 無視 上 


する 


捕 け ば いう つこ と な し だ 。 


出し Z は SAJ 


00000 ブ 800 


7 


と いつ だ と ころ だ 。 ゲー ム の 全 ぼ ぽう 見 | 
えて きだ と 思う 。 こ れ で 絵 コ ン テ も どき を 四 


と が 7 た 3 早川 作 上 上 


キー ボ 


ag 


3 まえ に 
まけ 芋 や 握れ ./ 


原作 の プロ プラム は 流れ が 入り乱れ て お 
り 、 ア マゾ ン 川 や 場 子 江 の よ うに 流れ が 層 
ぐ く な つて いる 。 プ ログ ラム は 流れ や すぐ 組 
お の が 望ま し い の だ 。 そ こら じゅ うに GO 
TO ダム や GOSUB 池 を 作る の は 良く な い 
プロ グラ ム だ と いえ る 。 

シナ リオ ガ 完 成 し た 今 、 最 も 重要 な の は 
いか に 速く 流れ る よう に する か な の だ 。 つ 
まり 素直 に 流れ る よう 、 プ ログ ラム 全体 の 
流れ を まとめ て お け ば よい 。 


この ゲー ム の 場合 は 図 一 1 の よう に な る 。 


プロ グラ ミン グ の まえ に は 秒 ず 、 こ の よう 
な 感じ の 絵 を 描い て 流れ を 具体 的 に 把握 す 
る よう に し な いと 、 あ と て で て 混乱 し て き て 近 
き を 見 る 可能 柱 が 高い 。 

ノ ト テ チ ヤー ト に を 勾 つ て る キミ は 、 も ち 
つん 、 ノ ローチ ヤー ト の 記号 で 書 ぐ べし 。 
さて 、 給 が 描け だ か ら も うつ 準備 OK や と 
宮 つた だ ら あ まい 。 ご この 状態 で 各 ル ー チ ン の 
基本 的 な 役割 、 つ まり 何 を どう すれ ば よい 
の か を 明 催 に し て お か な いと ダメ だ 。 ご この 
段階 で や わ ゃ ん と 練 ら ず に プロ グラ ミン グ を 
始め る と 、 行 き あ た り ば つた だり 型 の プロ グ 
フ ム に な りや すい の だ 。 

癌 ルー チン ご と に まとめ る と 次 の よう に 


な ろう つ 。 


各 ル ー チ ン の 要素 


【 初 期 化 ルー チン 】 

④① グ ラフ ィ ッ クス 画面 を オー プン する 

@ 変 数 の 整数 化 を 行う (高速 化 の だめ ) 
③PLAY 文 の 初期 化 を 行う 

④ 配 列 を 宜 言 する 

⑥ キ ャ ラク フタ パタ ー ン を 文字 配列 に 読み こ 
お 

⑥ 面 デー ツ を 配列 に 読み こむ 

⑦ 沙 要 な パラ メー を 読み こむ 

⑧ サ ウン ド デ ー タ を 文字 変数 に 読み こむ 
【 デ モン スト レー ショ ン ・ ル ー チ ン 】 

④ 大 き な タ イト ル (ICE BLOCK) の 表示 
を 行う 

② メ ッ セ ー ジ (HIT SPACE OR TRIG 
GER) の 表示 を 行う 

③ モ ンス ター、 モ ンタ 、 アイ スプ ブロック フ を 
動か す 

④B.G.M. の 演奏 を 行う 
スペース キー ガ トリ ガー ボ マ タン が 押さ れ 
だ 時 点 で 、 入 力 に 褒 じ て 入力 装置 (モー ボー 
ド の カー ソル キー か カジ ヨイ スティック ) を 
設定 する 


が ペ ン と 向 コ ヨー ビー で 臣 半 し て キ 
へ と 向かう の だ 。 
まず は 、 初 期 化 ルー チン 。 


ゲーム スタート アカ ウブ ルー チッ 」) 


スコ ア 、 モ ンタ の 数 、 面 数 な どの 初期 化 - 


⑨ 面 の パタ ー ン を 表示 する 


締 還 472 代 SNS 1 


初期 位置 を 設定 する 
[イン ルー チン) 
キー ボー 
を 受け 、 入 力 に 遍 じ て モン を 動 ガ す 


② モ ンタ の 動き に 反発 させ て アイ スプ ロッ 還 


プ を 動 が す 


ドカ ジョ イス ティッ ク カ ゥ 入力 胃 


③ モ ンス ター に モン タダ の % の 速 さ で 、 モ ン 


を 追い けさ せる 
@④ 面 リア 時 か 、 モ ンス マー と モン が 衝 | 


突 し だ とき に ス クリーン を テキ スト モー 


ハイ スコ ア 、 


モン タ の 残り の 人 数 を 表示 する 。 そ の と き 還 


に 状況 に 記 じ だ B.G.M. を 演奏 する 


カ な り 大 まだ が 、 こ の こら い プ ログ ラ | 
ム の 内 容 を 決め て お け ば プロ グラ ミン グ は 購 


ラン あう 2 た 。 


いよ し よ 、 
ブロ グラ ミ 
は じ め る ぞ ./ 


機 は 熱し た 。 い ざ 出 陣 じ ゃ 。 紙 と 錠 筆 と 
ー ボ ー 


ング を 


だ た り ま え に や れ ば よい (リス トー2 グ ) 


一 万 、CLEAR 文 で 文字 領域 を 確保 し て 、 
変数 の 整数 化 を 行 つ て 、 配列 を 宜 言 し て っ 


ご ご は ご ぐ く あ と 、 リ スト ー の の よう に な れ ば 合格 。 こ う 


| 379 
| 399 


ICE BLOCK For MSX ちこ ん で や ろう / 
29 ・ 夫 0 
39 " Original scenario by S.ISHIHARA ⑧ 文 字 領 域 の 確保 、 変 数 の 初期 化 、 グ ラフ 
49 Character by S.ISHIHARA の ィ ッ クス ・ ス クリ ー ン の オー プン な ど 、 プ 
59 Scenario enhance by DEBU 的 レー 、 
69 " Game program by DEBU ログ ラム の 付き 物 的 初期 化 を 行う 
79 Scene-pattern by YUKI!! 二 レー 
89 ・ Special thanks to Mr.YAMASHINA ⑥ 配 列 の 宣言 と PLAY 廊 の 初期 化 を 行 
99 : 各 配 列 の 意味 は 次 の 通り だ 
1 CLEAR 1999:DEFINT A-Z 。 | pxPY… 0 の 
116 WIDTH 49:OPEN "GRP:" AS #1 PX,PY スプ ライ ト 移 動 時 の 増分 パラ 
129 DIM PX(3),PY(3) ,DX(3) ,DY(3), 5 光ら クタ 
139 PM=11:DIM PA(9,PM) ,PB(5,PM) 8 
149 PLAY "T255V15" DX. DDY で や や 移動 先 の カラ ー コ ー ド を 知る 
159 : - め の 増分 パラ メー 
169 RESTORE 2999 'CHARACTER DATA 記 た め の 2 - 
179 FOR I=9 TO 2 PA$ …… スプ ライ ト に 入れ る べき キャ ラク タ パ タ 
189 A$=" We _ 
199 FOR J=@ TO 31 ー ン を 保存 する 
219 。 AScA$tCHRSVAL("8H"4B$)) ⑩ PA_PB…… 面 の バターン を 保存 する 

三 す WW いい 
229 NEXT (キャ ラク タデ ー タ を PA$ に 読み こむ 
236 PASCI)cAS パラ メー タ 値 を 配列 に 読み こむ 
259 : F) サ ウン ド (PLAY 文 で 使う ) を 読み こむ 。 各 変 数 
266 RESTORE 2969 'PARAMETER DATA 6 
279 FOR !=B TO 3 の サウ ンド は 次 の 通り だ 
289 READ PX(I) ,PY(I),DX(I) 、DY(I) DP$ …… デモ の と き に 流れ る B.G.M. 
90 CP$ …… 面 を クリ ア し た と き に 流れ る B.G.M. 
319 RESTORE 2989 'SOUND DATA ⑲ 0OP$… モン タ が 他界 し た と き に 流れ る B.G.M. 
329 READ DP$,CP$,OP$ ,GP 、 
336 : RT GP$ …… ゲ ー ム オー バー の と き に 流れ る B.G.M. 
349 RESTORE 3999 "MEN DATA 人 ンー 
359 FOR I=9 TO PM-1 G⑤ 面 デー タ の 惑 みこ み を 行う 
369 FOR J=1 TO 9 * な お 2000 行 か ら の DATA 文 は 各 注釈 通り の 内 容 だ 
READ A$:PA(J,1)=VAL("&H"+A$) 
389 NEXT ⑯ 
FOR J=9 TO 5 

499 READ A:PB(J,I)=Ax16 
419 NEXT 
429 NEXT 


439g 
2999 *※ BLOCK CHARACTER DATA 迷 拓 送 送 送 送 癌 
2619 DATA 7f,cC9,bf ,bf , bf ,b7。bf ,b7 。b7,b7 。 
b7,b3,bf ,bf ,C9,7f,fe,93,fd,fd,fd,fd,fd,f 
d,fd,fd,fd,fd,fd,fd,93.fe 
2929 '%※ MONSTER CHARACTER DATA 迷 省 送 革 類 
2939 DATA 97.1f,.3f,3f,7f,7b,f5.ff,ff,ff。 
ef,f9,ff。ff。fb。71。G9.f8,fC,fC。fe,de。af。f 
fff。ff。f7.9f,ff。ff。df,8e 
2949 'x MONTA CHARACTER DATA 拓 送 送 半 湊 拓 涯 
2959 DATA 9C,92.93.9f,3f,7b,75,ff。ff。64。 
e9.f9,f8,7C,7f,3f ,。39,49,C9.f9,fC。de,ae,f 
f。ff。27。.97.9f,1f ,3e,Ee,fC 
庄 2060 '% PARAMET EN 肖 導 拓 療 着 送 湊 浴 折 湊 肖 捧 湊 潤 湊 湊 送 湊 基 区 
職 2979 DATA 9,。-16,.8,-1.16.9,17.8.9.16.8,17 
。-16.9。-1.8 
2989 '%X SOUND DATA 畑 捧 捧 拓 送 拓 拓 賞 浴 湊 拓 浴 賞 湊 捧 湊 湊 捧 基 
2999 DATA "04DDGGFGAABBO5DDCE04BBBAFGEDD 
D" ,。 "05DDGEFBBBO6CDDCO6AABBB" , "04GGFECCC" 
: > "03GGFECCC" 
介 3 づ 999 '% MEN DATA 粗 溢 拓 湊 湊 捧 湊 湊 湊 捧 湊 折 折 折 拓 折 着 演 潤 湊 拓 
3919 DATA 989,998F,9999.9189,9920,9920, 
9A1.1D9A.9294.11.6.9.4.4.6 
3929 DATA 99A9,.92A9.9222.941A.9498.95E4, 
9419.9499.9999,12.2.5.2、8。4 
3939 DATA 1422.9989.9248.9528.9568,9409, 
1 99BC,9999,9499.19,1.9.2.9,4 

3949 DATA 9AAA.,9999 .9AAA,9999.9AAA,9009。, 
9AAA,9998.9AAA,19.2.4.8,.4,2 
3959 DATA 9998.9419.9849,1984.9198.9210。, 
9421.9942.9999.13.8.11.8.13.6 
3969 DATA 9998.1324.9499,19D9 ,9599 .992C, 
9881.9919.93B2.7.3.5.3.9,.3 
3979 DATA 9980.9998.9469.9114.9292.9859, 
99C8.9499.9129,11.5.12.6.7,5 


3989 DATA 9888,9422.9888.9242.1988.9222。 


9988.9992.9888,13.3.6.6.13,7 

3999 DATA 9292,9488.9129.9849.9199.0950, 
1494.9199.9999,7.5.2.8。.12,2 

3199 DATA 1C89,9994.94F5,1491,17F9.199F, 
1949.9999,1FF9,1,2.2.8、7,2 

3119 DATA 9989.9989.99F8,.9489.949B,9489。 
94DC,9499,1429,12.7.2.8.2。7 


打ち こま な く て も ゲー ム は で きる 注釈 行 。 
で も 、 作 者 へ の 感謝 を こめ て 、 な る べく 打 


ブロ 7? 5/, 


か プ ェ ッ 


画面 ひら 消す の に SCREEN 文 を 実行 し な 
けれ ば な ら な い 。 が 、SCREEN 文 を 実行 す 
る と 定義 し て お いた SPRITE お が 初期 化 さ 
れ て し まう の だ 。 あ の 長大 な キャ フク ダバ 
ター ン の デー タ を 何 度 も 読む の は バカ バカ 
し い の で 、 こ の 方 法 を 使 つ っ を わけ だ 。 ご こう 
し て お け ば スプ ライ ト を 消し た いと き に す 
ぐに 消せ る し 、 使い を いと き は SPRIT ヒ E 
$(n)= ニ PA$(n) [nh は スプ ライ ト 番 号 | の 
よう に 、 さ つと 使え る わけ だ 。 

の 点 め は 面 の パタ ー ン を 1 度 に すべ て 読 


599 
519 
529 
539g 
549 
559 

'569 
579 
589 


699 
616 
626 
639 


659 
669 
679 
689 
699 
796 
719 
729 


(《 メ 


な ら な ガ かつ だ ら 、 な る よう に 次 けら 山 が け 
る よう に 。 プ ログ ラム で 最も 大 切な の は 見 
や すさ 、 美 し ょ な の だ か ら …… 

な て 、 こ こ て 注 目 すべ き 点 が 2 つ ある 。 
1 つ は キャ ヤラ クタ パタ ー ン を 直接 GPRIT 
E お に 詰め こま ず に 、 文 字 配 列 に 入れ て いる 
と ころ だ 。 MSX を 使い 慣れ た 人 な ら す ぐ 
に わか る と 思う が ガ 、MSX は スプ ライ ト を 


599 : 


649 : 


(① タ イト ル (ICE BLOCK) の 表示 を 行う 

ッ セ ー ジ (HIT SPACE OR TRIGGER) の 表示 を 行う 
(スペ ー ス キー か トリ ガー 
か し 、B.G.M. を 流し 続け る 
⑩B.G.M. の 演奏 が 完全 に 終わ る まで 待つ 


ん で し まう こと だ 。 原作 で は RES TORE 
文 を 使 つ て 面 デ ー ー タ の 先頭 に READ 文 の 読 | 
み 先 を 設定 し て いる の み だ つ だ が 、 ご この 亡 
法 を 使 つ て ロリ ロードランナー の よう に 、 最 終 
面 が 終る と 最初 の 面 に 先祖 返り させ だ り 、 
面 の 追加 や 削除 が 簡単 に で きる よう に し た 
り し て お いた 。 

ここ で は 変数 PM に 面 パ ター ン の 最大 値 
を 入れ る よう に し て いる 。 
まだ た 、 サ ウン ド デ ー タ も 初 
期 化 ルー チン 中 で 文字 別に 読 
みこ ん で いる が 、 こ れ は メイ 
ジル ー チ シン 中 避 、 で きる だ け 
実数 や 文字 別 を 入れ だ く な が ガ 
うだ な からだ 。 これ なら 、 ブロ 
グラ ム の 変更 、 パ バー ジョ ヨン ア 
ツ ッ プ が し や すぐ な る 。 ご こう い 
う 気 配り も 大 切な ん だ ぞ 。 
次 は デモ ンス トレ ーション 
・ ル ー チ ン を 作る 。 

リス トー が お ま ぼ 本 だ 。 こ 


人 O0 放 まま 1 よう は よさ ささ て て スス て て スマ スナ メメ ママ マズ ママ コマ 1 
SCREEN 2.2:COLOR 7:PLAY DP$ LH) 

FOR I=9 TO 2:SPRITE も (T)=PA$(I):NEXT |) 
FOR I=@ TO 3 

PSET(9,29+1I),9 

PRINT#1 。" rTn テコ ィ ー コ ニ ィ ー コ エエ 
PRINT#1 ," | 1I 
PRINT#1,." 
NEXT 


テコ ビ コ エ イ て " 


Re あっ 4 。 を PS 


に ます し に すし に し) し に し | 上 にし) り 


_ le 


FOR I=9 TO 1 

PSET(59+I,189+I),9 

PRINT#1 "HIT SPACE KEY OR TRIGGER" 
NEXT 


IF PLAY(9)<>-1 THEN PLAY DP$ 
PUTSPRITE 1,(9+I,89),8 
PUTSPRITE 2.(9+1。116)。11 
PUTSPRITE 9,(9+I,152),7 
IF STRIG(9) THEN JK=9:GOTO 739 
IF STRIG(1) THEN JK=1:GOTO 739 
1=(I+8) MOD 256 

GOTO 659 


L) 


739 IF PLAY@) THEN 73 人 の 部 分 は ほとん ど 原 作 に ま を 
加え て な い の で リス ト を 読め 

(0 スク リー ン を ハイ レゾ グラ フィ ックス モー ド に 設定 し 、 フ ォ ア 還 

グラ ウン ドカ ラー の 初期 化 、B.G.M の 演奏 を 行う は すぐ に わが る だ ろう 。 

(① わ スプ ライ ト に キャ ラク タバ ター ン を 詰め こむ 入力 装置 と し て ジョ イス テ 


イッ ク を サポ ー ト する 旋法 は 
690、700 行 で 行 つ て いる よう 
に 変数 (この プロ グラ ム で は 
JK) に キー ボー ド か ら な ら 
0、 ジ ヨイ ステ ィ ッ ノン 1 の は ほ 
うつ なら 1 、 の の ほう つう なら の を 入れ て お いて 、 
STICK(JK) で 入力 を 受け れ ば よい わけ だ 。 


ポタ ン が 押さ れる まで スプ ライ ト を 動 


ン ラ 


邦 @ 


| 見 や すい ブロ グラ ム ム を 
作れ ば 、 


よい プロ グラ ム 


さい グー ムタ ダー に ルツ ん 
こ で は 1 ゲー ム 内 で 初期 化し な けれ ば 


5880 数 2 コジ キジ: の の 者 、 価 
な ど ) を 初期 化し 、 面 の パタ ー ン を 画面 に 
表示 する の だ 。 リ スト ー4 が その ルー チン 
5 

ご ご で 注目 すべ き な の は 面 パ ター ン の 構 
成 。 原 作 で は 縦 方向 に 対し て 1 つ ず つ し か 
ブロ ッ ク が 置け な ひか つ だ が ガ 、 こ の パー ジョ 
ン で は ロー ドラ ン ナ ー の よう に 好き な 位置 
に 好き な 数 だ け ブ ロッ フ が 置け る の だ 。 図 
ー ど の よう な 面 作成 用 紙 を 作れ ば 、 誰 で も 
間 単 に 面 を 作る こと が で きる ( 図 一 3)。 面 
を 増設 し だ い 場 合 は 3120 行 以後 に デー 文 
と し て 和 面 の パタ ー ン を 置き 、 初 期 化 ルー チ 
ン の 130 行 に ある PM に 増やし た い 面 数 を 加 
えて や れ ば いい 。 

さあ 、 最 後に ゲー ハム ・ メ イン ルー チン を 
作る 。 

ここ は 大 きく 分 け て 、 人力 か ら モ ンダ を 
動 ひ し 、 ア イス プロ ッ ク と モン スタ ー/ の 制 
件 を 行う まで の 部 分 (メイ ン ル ー プ ) と 、 


図 -2 画面 作り 用 紙 フ ォ ー マ ッ ト 
12 本 7 PFFEE 


| 
| 十 二 填 


ぐら で この の OSFO 一 


ンタ 


例え ば (3⑬) ( 1 面目 の パタ ー ン ) の 8 段 目 に 注 
目 。 こ の 部 分 を 左 か ら 順 に 面 作 り 用 紙 フ ォ ー マ 
ッ ト の 太線 で 4 分 割 (いち ば ん 左 は 1 マス だ け 


メイ ン ル ー プ より 分 岐 し て 処理 され る 面 フ 
リア 、 モ ンタ の 他界 、 ゲー ハム オー バー と い 
う 3 種 類 の メッ セー ジ の 表示 、 ス コア や 面 
数 の 制御 を 行う 部 分 に な る 。 

メイ ン ル ー プ で は 、 初 期 化 ルー チン で 配 
列 に 読み こん で お いた / パ パラメータ を 使っ て 
各 ス プラ イト を 秘 動 させ る 。 万 法 は 図 -4 
の よう に すれ ば よい の だ 。 

メ ツ セー ジ の 表示 だ が 、 種 類 と も 表示 
すべ き 内 容 は 同じ な の で 、 そ の 部 分 は サブ 
ルー チン と し 、 各 分 岐 よ り 呼 び 出 す よ うに 
する の が よい だ ろう 。 

リス トー5 の よう に な れ ば OK。 プ ログ 


フ ム 的 に わか り に くい と ころ は な い は ず だ 。$ 


これ で すべ て 終わ つ だ 。 リ スト の てら を 


画面 デー ダ の 取り 亡 


ON 900 の 2000 


が で きる ./ 


図 - 人 4 パラ メー タ の 使い 方 


スプ ライ ト は 
上 下 左 右 の 4 方 
向 に し か 動か な 
い の で それ ぞ れ 
番号 を 付け て 番 
号 で 礼 理 す る 。 
図 の よう に 決め 
て お け ば 、IF 文 


を 使わ な く て も 
入力 に あわ せ ス プラ イト を 動か せる の だ 。 


つま り 、 方 向 を パラ メー タ で 指定 する と X, 
Y の 増分 値 に な る よう かな 配列 を 使え ば いい 
の だ 。 
PX( 0 ) ニ 0,PY( 0 ) ニ ミー16 
PX(1) ニ 16 , PY(1)=0 
PX(2) ニ 0 , PY(2)=16 
PX(3) ニ ー16, PY(3)=0 

こう な っ て いれ ば た と えば モン タ を 1 の 
方 向 ( 上 ) に 動か し た いと き は 、 
X 三 X 十 PX( 1 ):Y ニ Y 十 PY( 1 ) 

どす ずれ ほ い いわ わけ だ 。 


続け て 打ち こめ ば バー ジョ ン ア ッ プ の 『ICE 
BLOCKj」 が 楽し め る よう に な つて いる 。 
リス ト の 主体 量 は 原作 を 大 幅 に 追い 越し だ 
が 、 こ れ も プ ログ ラム の 見 や すさ ゆえ 、 お 
計 し あれ 。 


帰 算 夫 似 さ 克 NN ⑤ 


(の oO この ぴの お oO トト ト 5 一 


に な る ) し て 、 縦 に な ら べ る と の よう に な る 。 こ れ を 、 (< の 2 進 16 進 変換 表 
で 1 つ 1 つ 数 字 に する と 1D0A に な る 。 こ れ が 3a の 8 段 目 の デー タ だ 。 この よう 
な 作業 を 1 段 目 一 9 段 目 ま で 行え ば いい わけ だ 。 そし て 、 デ ー タ の 最後 に モン タ 
(⑳)、 ア イス プ ブロッ ク (⑧) 、 モ ンス ター(⑥) の 順 で 初期 位置 を 付け 加え れ ば で 
き あ が り 。 例え ば の デー タ は 、 0080008F.009001800020002000A11D0A020 
4.11494.66 と な る 。 1D0A が 8 段 目 の デー タ 、 末 尾 の 6 個 の 数 字 が 3 つの キャ ラク 


タ の 初期 位置 だ 。 


ロ 7 7 ( バ 


1139 NEXT 
1149 NEXT 


9 一 | 1 中 *% GAME START UP 半 迷 洋 送 湊 湊 演 基 洋光 洋 湊 甘 澄 
1919 SC=9:MO=3:RO=9:T=1:ME=9 
1929 : 


| LINE(BX+2,BY+2)-(BX+13,BY+13) , 1.B 


* 1159 : 
1 の の EE 1169 ・ SET LOCATION 
に に 1 ⑲ ii17 FOR I=6 TO 2:SPRITE$(1)=PA$(1):NEXT 
1O) 1959 LINE(9,9)-(249,176),12,BF NMCBOM SEO 
|_1969 LINE(112,9)-(127,15),1,BF BN 
ー1979 FOR Y=1 TO 9 I 1(X,Y)・ 
1989 FOR X=1 TO 13 人 0 | !289 IX=PB(2ME):IY=PB(3.ME) 


1219 PUTSPRITE 9,(IX,IY),7 ' ICE BLOCK 
1229 MX=PB(4,ME) :MY=PB( 5 , ME ) 
1239 PUTSPRITE 2,(MX,MY),11 ′ MONSTER 


1999 BX=Xx16:BY=Yx16 
⑮⑱ 一 1199 BC=((PA(Y,ME) \ 2^(13-X) ) MOD 2)x((RO MOD 16)+1)+1 
」 1119 LINE(BX,BY)-(BX+15,BY+15) ,BC,BF 


1249 : 

)1 ゲー ム 中 で 初期 人 すべ き 変数 の 初期 化 を 行う モン タ 、 ア イス プロ ッ ク 、 モ ンス ター を 初期 位置 へ STRIG(JK) 三 0 THEN 1235」 と いう 行 を 付け 加え る べ 
〇 基本 ゲー ム 画 面 ( 図 -2 参 照 ) の 表示 を 行う 表示 する し 。 そ うす れ ば 、 ス ペー ス ・ キ ー か トリ ガー ボタ ン を 
⑤⑥ 面 の パタ ー ン の 表示 を 行 う ※ 面 の 表示 が すべ て 終る と すぐ ゲー ム が 始ま る よう に 押す と ゲー ム が 始ま る よう に な る 

(⑳⑩ ス プラ イト に パタ ー ン を 詰め こむ な っ て いる が 、 こ こ で ひと 呼吸 ほし い 人 は 「1235 IF 


ここ か ら 1530 ま で が いわ ゆる 


@-ーーーーーーーー 一 | 1259|' READ STICK 
メイ シル ー ン / 1269 S=STICK( JK ) 


| 127@|IF S MOD 2=1 THEN S=S\2 ELSE 1329 
入力 を 受け 、 上 下 左右 を 0 一 3 の 2 1289 : 
1299 " MOVE MONTA 


番号 に 受 換 1399| IF POINT(X+DX(S) ,Y+DY(S) ) く >1 THEN 1329 
ウン 1319 X=X+PX(S) :Y=Y+PY(S) 
動け た ら 動 く 1329 PUTSPRITE 1,(X,Y),8 


1338| IF (X=112 AND Y=9@)+(ABS(MX-X) く <9 AND ABS(MY-Y)<9)<@ THEN 1559 ' OOPPS !!1 


が た 人 川 川 川上 川 


最後 の 文字 は 『 ウ ィ ザ ー ド リィ イ 』 で は な い 1340 
、、 5 1359 " MOVE ICE 
けど 、 シ ク っ た ら ^OOPPS『” と 表示 され 1369 | FOR S=9 TO 3 
る こと を 意味 し て いる 。 た だ し 、 こ れ は 1379 。 IF X+PX(S)<>IX OR Y+PY(S) く >IY THEN 1499 
ce R 7 呈 1389 IF POINT(IX+DX(S) ,IY+DY(S) ) く >1 THEN 1499 
注釈 文 。 実 際 の 働き は 、1560 行 と 1850 行 139B IX=IX+PX(S) :IY=IY+PY(S) :S=3 
で や っ て いる 1499 NEXT 
1419 PUTSPRITE 9,(IX,1Y),7 

4 方 向 すべ て に つい て 動く か どう か 調べ 1428| IF IX=112 AND IY=9 THEN 1699 "CLEAR !!! 

1439 : 
る の だ 1449 "MOVE MONSTER 


| 145@| T=Tx-1:IF T く 1 THEN 1599 
最後 の 文字 は や っ た ! あがり ! の 注 | 1469| MS=2+(Y く MY ) x2 
2 の " リン IF MY<>Y AND POINT(MX ,MY+DY (MS) ) =1 THEN MY=MY+PY(MS) :GOTO 1599 
釈 文 。 実際 は 、1630 行 と 1850 行 の 組み あ MS= 1 こ (X く MX ) x2 
わせ で PRINT し て いる IF MX<>X AND POINT(MX+DX(MS ) , MY ) =1 THEN MX=MX+PX(MS ) 
PUTSPRITE 2,(MX,MY) ,11 
IF (X=96 AND Y=9)+(ABS(MX-X) く <9 AND ABS(MY-Y)<9)<9 THEN 1559 ' OOPPS !!! 


1599 
モン スタ ー を モン タ の 2 分 の 1 の スピ ー 
ド で 動か す た め に 1 回 ご と に 休ま せ て い 
る の だ 


GOTO 1269 


*。 00PPS 1 0 0 WW へ WW へ WW へ WW べべ 
MO0=MO0- 1 : P も =OP$:A も ="O0PPS 11!" 

79| IF MO=9 THEN 1669 

1GOSUB 1789:GOTO 1939 


モン スタ ー が モン タ を 追っ か ける た め に 、 
まず Y 軸 に つい て 調べ て いる 
・。 CLEAR !!! 


RO0=RO0+ 1 :ME= (ME+ 1 ) MOD PFM 

] 5C=SC+TMEx199 

| MO0=M0+ 1 :P や =CP も :A も や ="CLEAR 01109 
] GOSUB 1789:GOTO 1929 


上 と 同様 、 X 軸 に つい て 調べ る 


この 判断 は どちら か 一 方 だ ば け で いい の だ 
が 、 公 平 を 期す た め に 2 つ 置 いた の だ > 
・。 GAME OVER 


P$=GP$:A$= "GAME OVER" :GOSUB 1789 
LOCATE 19.29:PRINT "HIT SPACE KEY OR TRIGGER" 


モン タ が や られ た ! 残り の モン タ が 0 
な ら ゲ ー ム オー バー ルー チン へ 
JK=- 1 
FOR 1I=1 TO 299 
IF STRIG(9) THEN JK=9:1=2999 


IF STRIG(1 ) THEN JK=1:1=2999 
| NEXT 


や っ た ぜ ! 1 面 ク リア ! と いう と き 
の ルー チン 。 原作 と は 違っ て スコ ア は 一 
守 も た 


liF JK THEN 599 ELSE 1999 
常に デモ に 帰っ て いた の で は 芸 が な い の 1770 


で 、 一 定時 間 内 に ゲー ム を は じ め れ ば デ 1799. "- PRINT 5C0RE ---ーーーーーーーーーーーーーーーー 
モ を 見 な く て すむ よう に し た 。 こ ん な や | IF PLAY(@) THEN 1899 

配り も ゲー ム 作 り の 大 切な ポイ ント だ ! 

どう し て そう な る か 、 よ ー く 考え て みよ 


こ 


9 


メッ セー ジ の 表示 を 行う サブルーチン 。 
すべ て の メッ セー ジ で 共用 で きる よう に 、 

変数 A$ や に メッ セー ジ の 文字 を 入れ る 方 
法 を 使っ た 


SCREEN 9:COLOR 15:KEY OFF:CLS 
IF SC>HS THEN HS=SC 


LOCATE 16,4:PRINT A$ 
LOCATE 14.8:PRINT "YOUR SCORE" 1SC 
LOCATE 15,12:PRINT "HI-SCORE" iHS 
]LOCATE 16.16:PRINT "MONTA "jiMO 


才 | FOR I=1 TO 3999:NEXT 
き |IF PLAY(9) THEN 1919 
] RETURN 


292 


it ブー ム 


に - の に 
ジー 
v ソ ct ス \ を 銀 ト " 
PA 


ひと り で 遊べ る 7 な ら べ 
ルー ル は 完璧 


庄 FUH PC-8001mkI/ xx リ スト っ 55 ペ ー ジ 
0 6601mkII NBASIC 
近 BY 湾 炎 秦 


ご らん の と お り の その 点 、 こ の 『7 な ら で 」 な ら 、 た 
ノノ なら ベ べ です っ だ た ひとり て 完璧 な 7 な ら べ が 楽し め 
7 な ら べ で し て 遊び た いな …… 思っ 。 る 。 し か も 、 相 手 が 3 人 (全部 コン ピ 


だ ら 、 相 手 が だ た っ た ひと り し か いな く ュー クタ う ゆい あの だ か も 、 和 放 び きだ ん も 
て 、 お だ が い 手 の うち 丸見え で つま ら ある よさ 。 
が いい ゲ ー ム を し て し まつ た こと だ ん て ブレイ ヤー1 一 3 が ユン ピュ ー タ で 
1 一 3 か 2 一 9 PP3 一 0 か 4 ニー な い ? (私 は ある の が ) 4 が キミ 。 目 分 の 番 が 回 っ て きた だ たら 、 
出し た い カ ー ド の 上 に 表示 きれ て いる 
数 字 を 入力 し て 、 リ ター ン ・ キ ー を 押せ 
ば 0K。 パ ス し た いと き は 、 [01 リ ター 
の 6 0 5 まき 財 WW 。 8 則 朋 
て 夫 格 (た だ し 、 出 せる カー ド が ある 
の に 4 回 目 の パ ス を し たら 、 コ ン ピ ュ 
ー タ が 任意 の 1 枚 を 取り 出す 仕組 み ) 
KK まで いけ ば A が か ら 出 せる ルー ル は 
ここ で は 採用 る きれ て いな い の で 注意 。 


P1 一 9 PP2 一 9 P3 一 5 PA4ー 4$ 


ケ ゲームス タ ー ト / ぼ こ の 義 
ご を 思い 知ら せ て や る 
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イラ スト は 友人 松永 くん の 作品 
ども 。 み な さん 、 こ ん に ち は で す 。 来 6 
週 か ら 恐 怖 の 期末 テス ト が 始ま る の で す 。 
に も か か わら ず 、 プ ロレ ス 番 組 な ど 見 な - 
が ら こ の 原稿 に 向 ww ヘ 、 
か っ て いる の は 、 に 
中 間 テ スト で 控 破 アン の 
り の 2 科目 赤 点 を 人 NN、 
成 し と げた 、 余裕 AM * め 
と 実力 の な せ 0 
る 技 で し ょ 一 
か 。 実 は ぼく 
ロリ コン で す 。 
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FOR PC-8B00U1mkII/ 
0001 mkIL N-BASIC 
pY 形 己 基 
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軒 | 


ロロ nn 
四 是 


* ンー 


象 こ の スペ ー ド ガザ バフ バフ マン 。 ご これから ム ニ ヤ ハニ ヤ を 
食べ よう と 、 ま ず ざ は 準備 体操 (の つも り ふ 


の に の ぐ 食 え 、 
バク バク 食っ て 食い まぐ れ 


太り リス ト っ 56 ペ ー ジ 


キミ は バク バク マン 。 
な ん て 突然 いわ れ て も 陰 
っ ちゃ うか も し れ な いけ 
ど 、 こ の ゲー ム を RUN す 


る と 、 必 然 的 に を うな る 。 


バク バク マン は スペ ー ド 
の 形 を し て いて 、 ム ニャ 
ム ニ ャ (|) が 大 好物 。 
ムー ャ ムキ ヤ は 、 そそ の 
大 好き な 食べ 物 の 名 前 に 


1 8 IN IN 8 IN IM HI WI W WE HI NM BMW ML 8 


@ 
り れ に 。 電 
た が | 8 
507 な し | 
ペ っ ぜ か と 
1 ^ く か が か テ か m 
2 リク ル | 
イ を し 日 / 

コ 銃 まほ グ ボ ポ た 
ン め し ラリ ん 邊 
人 

We … ホ (に 
Wi K じ 問 編 シ 投 イ W 
EE つっ の め が 集 ェ 柄 | 
て ュ = た 晴 都 ツ し コ 衣 
m み っ お か 門 マ まれ 注 ト た ン ョ 
mn た た も ん こす てこ ま し に は 入 『 
ん の し た 電 さ な す 用 舎 な 6 

て で て てろ ん 外 ン ロ リーク 月 ん 「1 
ほす や か で と 入 は マ ボ ポ さ の ビデ - 
ささ EE EE ここ ここ ご 
時 間 ご と に な に や ら 音 が し て ジャ マ っ 


けが人 が ヨコ ツ コ ツ 出 て る も ちゃ う 。 こ W 
を 爆弾 で 壊し た り 、 ワ ー プ し た り し て 、 
ム 三 ャ * ム み ニ ャ を 全都 食べ て し まお うっ 
て の が 、 キミ の 目的 だ 。、 

使用 キー は [1I2I315] (な 下 右上 )。 
ちら か と いう と 知 が 出現 し た ら や っ か 
いな こと に な り を そう な 場所 か ら 食 べ に 
行く よう 心がけ よう 。 

1 回 に 出現 する 岩 は 、 面 数 士 15 個 。 
グズ グズ し て いる と 、 い て くら で も 娠 が 
] 増 た でき て 。 も うと ど と うし よう も な く な 
る か ら 、 効 率 よ く 食 べ て いく で し 。 


人 変え よう 。 例え ば 、 ス ル 央 を 砕く た め の 爆 弾 は 、 最 初 は 10 個 
まな メ と か (わし の 好物 じゃ )。 キミ の 手 の な か に ある 。 テ ン ・ キ ー の 
あ 財 バ と ころ が 、 気 持ち よく 食 操作 で その まま 岩 に ぶつ か れ ば 、 自 動 
ま よ ババ で まわ つて いる と 、 的 に モッ ト さ れ 、 佑 が 爆破 され る の だ 。 
も ちろ ん 、 1 個 破壊 する た 
の ウ ゅ た し も 5 びに 、 爆 弾 は 1 つ ず つ 減 っ 
い わ \ ク ハク マン 千 Se あま り ム ダ な た 
る のり に 秒 り た ん )! 
人 お を 寺 し て 遊ば な いよ うに 。 
っ ま 8 爆弾 は * "で 1 つ 補 給 。 
1 だ と * 供 が ワー ブ 穴 。 た だ し 
上 ー どこ に 出る か は わか が から な い 。 
2 員 人 状況 が 絶 紀 釣 に な っ た ら 
/ / lc] を 押 そ う (自殺 キー) 
お と 一 参考 一 「 は る み の ゲ ー 
の ムラ イブ ラリ ーPARTTII』 
江 ジ テッ トー ん 4 の 半 償 あ 。 ち 。 ん > フッ フッ フッ 、 つ い に 自 分 で 自分 に ベン ネー ム を つけ て し まつ だ 。 と ころ で 、 私 は だ けち ゃ ん と お 話 を し て 


更 個 ! あ 


いる と 、 頭 ガ フ アド ベン チャ ー し て きま すず 。 残り 時 間 と 体力 を 考え な が びら で な いと だ けち や ゃ ん と 会 話す る の は 危険 で す 。 


ン / 


\/00g- つ g@ 


バズ ルナ 本 格 リ アル タダ イム ゲー ム 


けん 
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婦 リ スト っ 57 ベ ペー ジ 


楽し い ボ ー ナ スス 
8 テー ジ も つい て る 


これ 、 と て も 長い ブロ ググ デム だ けど 
それ だ け の 内 容 も あわ せ も つつ 永久 保存 
心 。 カッ ツ て 拓 ち こも う / 

画面 左 に 積み あげ ら れ て いる の は 、 
20 個 の BOMB (爆弾 これ も コン ピュ 
面 。 ー タ と 交 互 に 取っ て 最後 の 1 個 (斜め 
線 の 入っ た 不良 品 ) を 取っ た ら 負 は け 、 
取ら せ た ら 勝ち と いう ゲー ム だ 。 実際 
に は 1 個 残 っ た 時 点 で 勝負 の 判定 は お 
り ち ゃ うけ ど ね 。 勝 て ば その まま 、 負 
けた ら 残 り 数 が 減っ て 次 の 面 へ 。 勝 敗 


CX 


ANp 尋 


加 


4 ガ ん だ ん な キヤ ラク 紹介 の 初期 
りり 6 た キシ ジッ うー で グー の スタ ー ド 。 


に ボ 。 。 ム 
多少? 用 と に か か わ ら ず 取っ た BOMB の 数 x100 
当 デ 用 用 が プ ァ ラス さ れる 。 
ビー て N ー ク ] = ツー 
ジ 用 [2I4I6I8HC ヾ カラ * と 書か れ た 箱 を 動 


、W 
WWW 


昌 弄 


W 
MW 
NM 


WM 


M W 


各 い 


な さん 許し て あげ て くだ さい 


| っ 


ピコ 
9t(」 


49 選 
き F に JNN ロ S 


て ご 
デ 


ckHo 正 層 芝 。 叶 we 
さす ペー 汗 み ス 促 均 料 し AN( 


て 中 89 と さて の 葵 る 池 屯 く ③ 


ひさ は 
AN 


r- 〇 の 有 科 く の し の の で し の 〇 で 


「 細 人 
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er 
? 
ト BI IM 3 II B  』 3 BE  』  』 WI 』 ji 」 


ト NM 8 IM M IM MM MI 8 BI BB i つ 


か し て IN (左下 ) へ 向 か ぉ う 。 こ こ 
に 入れ ば 自動 約 に BOMB が 入っ て く る 。 
も 6 うい ら な いっ て と き は 、 す で に は な 
れれ ば いい 。 だ だ し 、 1 回 に まとめ て 
取れ る 個数 は STEP (左下 の 表示 ) の 数 
(2 テマ 4) で 決め られ て いる の だが) こ 
の 数 は ボー ナス キャ ラ (ハン ドル みた 
いな キャ ラク タ ) を 取っ た り 、FTRE か 
ボー ナス キャ ラ に ぶつ か っ だ た だ りす る だ た 
OM に 。 ラン みみ に テール リーナ 1 きれ ある 。 
抱え た BOMB は 右 下 の OUT へ 持っ て 
いけ ば 、 自 動 的 に 吸い あげ られ る 。 次 
に ラミ ンピュータ ガ が 朋 分 の 分 を 取っ て 、 
爆弾 取り 再開 。 こ の 繰り 返し だ 。 
爆弾 を 抱 を て いる と き に スペ 
ー ス ・ キ ー を 押せ ば 5 x 5 の 範 
囲 を 破壊 する 時 限 爆 弾 が セ モット 
で を きる 。 た だ し 、JINSOUIU の と 
ころ て 爆発 させ る と 、 受 け 渡 し 
機能 も 破壊 され る の て 注意 。 
奇数 面目 を クリ ア す る と 、 時 
間 制 限 付 き の ボ ー ナ スス テー ジ 
も 楽し め る ぞ 。 面 は 全部 で 9 パ 
ター ン 。 と に が か がく 楽し め ゆる 、 大 
4 ゲーム だ よ 。 


ママ ボー ナス ステ ー ジ 。 照 準 の "カラ "を 動 ひ し て 、 ミ サイ ル を 撃て / 
ミサ イル 発射 は スペ ー ス ・ キ ー。 
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フ セ の 出 て こる 
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半 詳 FUR PC-600ImkI 
計 N60m-BASIC PAGE4 


テ 、 や 人 き 
に ら 


リ スト っ 60 ペ ベー ジ 


聞い て くる の で 、 賭 けた い 金 額 を 入力 。 
つま きり 、2? ツ の と ころ て 3 を 和 人力 す 
る と 、 2 の 目 に 賭け 金 3 を 置い た こ 
に な る 。 た だ し 、1 つの 目 に 賭け 5 れ 
る 金額 は 1 一 4 の あい だ に 限る 。 周 け 
だ くべ が いよ と き は 、 0 で だく も や 人 用 ずみ 
の 

ファ レイ ヤー 1 か ら 順 次 、 2 一 30 ま で 
賭け て し まっ て か ら 、 プ "レイ ヤー2 の 賭 
け 金 セッ ト を も スター ト 。 2 人 と も 賭け 
お わる と 自動 的 に ルー レッ ト が 回 り は 
の 当選 唱 ww と いう 感じ 
で ボー ル が 動き 、 ピ ビッ と 止ま っ た と こ 


プロ 77 ム 


ジェッ 


m わか っ た ./ キミ は モス ラ だ ろ 』 
最近 は 性 能 の いい マシ ン が 続々 出 て き - 
て 目移り し て し まう 。 と ころ で 、 虎 姫 高 
校 1 年 7 組 45 番 、 ア メ フ ト に 所 属 。 さ て 、W 
ここ で 問題 で す 。 い っ た い 、 私 は だ れ で 


と 1 8 IN 0 BN WNW IN NN 上 上 上 上 BB 月 朋 月 邊 | 
提 上 昌 月 引 衣 用 用 及 用 店 朋 朋 


トト 時 月 用 M 上 昌 朋 MM 8 BE BMB8 上 B っ 


みろ が あ た だり の 目 。 あ だ っ た と き の 配 当 
は 、 目 の 数 x 賭 け 金 。 よ く 、 街 を 歩い 
を 4 の な と 見 が ける デレ ビ ァ ルー レッ トド ト 
と 似 た よう な ルー ル が だ 。 

持ち 金 が 0 以下 に な る か 、 オ ー ナ ー 
の 持ち 金 が 底 も つい だ とき ゲ ー ム オー 
バー。 2 プレイ ヤー の 場合 は どちら か 
が 0 に な っ て も ゲー ム を 続け られ る 。 


ルー レッ ト に 限ら 6 ず 、 賭 け 
と の て その 人 の ググ や や が い る 
いろ あっ て お も し ろ い 。 勝つ RG 
か 負け る か は 、 時 の 運 だ か 6、 舌 ゎ ン と ) レ は | 
どん な や り 方 が 正しい と は い 
を た な いけ と 、. 勝 っ た ほう は き 。。 
まっ て 「 私 は 正しかっ た 」 っ の ぐ や 
UN の お 1。 

で 、 こ の ゲー ム は 、 き わ め 


の 


Mbz が NE ずら 2 
人 で や れ ば 
こい 較 議 

最初 に 人 数 を 聞い て くる 。 * の に ゃ ゆめ PLRYER 1 

1 か (21 で 、 ひ と り て 楽し むか 引 


2 人 て 戦う か 選 ぼ う 。 

GE ドー ルー この 
ルー レッ ト を 、 な ぜ キ ミ が や 
に 7 の だ の (た ゆう 
語 が ツラ ツラ と 画面 に 出 て く 
る の だ 。 よ お く 理 解 し て ( 無 
相 し て で も よい /) スペ ー ス ・ 
キー を 押す と 、 ル ー レ ッ ト が 
は まる 。 

さあ 、 ま ず 賭 け 金 を 入力 し 
よう 。 代 い み ドー ド の うん 
に 。 まほ 0 Re 


5 か 


(っ に に 


穫 テ ッ ビ 
表 個 !9 


< 突然 あっ ちゃ ん > だ けち ゃ ん の 家 に は 犬 が 3 匹 い る そう で す 。 で も 、 名 前 が つい て いる の は “エミ “(ちなみ に ハッ トリ ぐん の 2 の 
奥さん も 工 ミ ちゃ ん で す ) と いう 犬 だ け で 、 あ と の 2 匹 の 犬 は 文字 変数 で 、 日 に よ つ て 違う る で 呼ん で いる ん だ そう で す 。 


肖 /O09- つ g/ 交 /O5g-Og@ 


いち ば ん 下 ま で お 
り れ ば 100 点 / 
RUN さ る せる と 、 タ イト ル ん 表示 。 原色 
だ け を 使っ た カラ フル な タイ トル が だ 。 
スペ ー ス ・ キ ー を 押し て 、 エ ネル ギ 
一 量 100 か ら ゲ ー ム スタ ー ト 。 
キミ の キャ ラク タ は “ 火 ?。 た だ の 漢 
字 の “ 火 " だ けど 、 な ん と な く 〈、 手 を あ 
げ て 人 逃げ まわ っ て いる よう な 感じ 。 


マエ ネル ギー が ガ 100 以 上 あれ ば 、 穴 を あけ て 
難 を の が ガ れ る こと が で きる 。 
うま ぐ 使 お う 。 


OPT 


19B エネ ルキ ドー 8B2 
A こ うつ と こう いち ば ん 下 の 階 まで 追い つめ ら 


れ だ | し が し 、 ま だ まだ り ! 


で ココ コロ ロマ TP アー マヤ" テ 。 
これ で 3 号 連続 の 重松 お じ さ ん ョ 

この ゲー ム は プロ ポ (プロ グラ ム ポ シ 
ェ ッ ト の こと ) 4.5 号 連続 掲載 記念 に 、 と 
半年 ぶり に 作っ た も の で す 。 し 
(らく は な れ て い 
た た め に 、 シ ョ ー 
ト な の に 1 か 月 近 
く か か り ま し た 。 
5 号 で リス ト が PE 
刷 ミ ス と の こと 、 お 電 
話 い た だ きま まし た が 、 
か えっ て いい 宣伝 に な 
る と 思っ て いま す 。 
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青 や 赤 の ブロ ッ ク が いた る と ころ に 


Ni 別人 逆 ら ば っ て いる 地下 通路 を 下 へ 下 へ と 


降り て いく の が 、 キ ミ の 宿命 だ 。 キ 
ミ の 後ろ を 不気味 な エイ ラー(@) が 
追い のか の け て き て いる の が だ 。 

この エイ ラー は 、 動 き は そん 
な に 速い わけ で も な いし 、 と き 
と どき キミ と は 反対 方 向 に 行っ て 
し まう けれ 、 い つの まだ か 、 
すーっ と キミ に 近づい て し まっ 
て いる と いう お そろ し い 怪 物 な の だ 。 
エイ ラー に つが ま ら な いよ うに 、 い 
ちば ん 下 の 階 ま び むり て いけ ば 、 ス コ 
ア が 100 点 増え て 、 画 面 が 上 へ スク ロー 
ル す る 。 そし て 再び 、 キ ミ の 地下 へ の 
果て し な い 降 下 が は じ ま る の だ 。 こ の 
と き 、 エ イラ ー は キミ の 上 の 階 に いて 
も 、 キ ミ と 同じ 階 に 突然 出現 する 。 つ 
まり 、X 軸 の 座標 が 同じ に な っ て いる 
と 、 あ っ け な く や られ て ゲー ム オ ー バ 
ーー に だ が っ て し まう か りら 注意 が 必要 だ 。 
キミ は カー ソル ・ キ ー で 上 下 左右 に 
移動 で きる 。 画 面 は 左右 で つなが っ て 
いる よ 。 エ ネル ギー が 100 以 上 あれ ば 、 
と 円 を 同時 に 押せ ば 穴 が 堀 れ る ぞ 


(だ だ し エネ ルギー は 100 減 る )。 
赤い プロ ッ ン と 青 
じい プル ツク 


エネ ルギー は 何 $ も し て いな 〈 く て も 1 
つ ず つ 減 っ て いく か ら 、 そ の まま で は 
0 に な る の を 待つ ばか り 。 そこ で 、 赤 
い ブ ロッ ク を 見 つけ た ら 、 な る べく 取 
っ て いこ う 。 こ れ は 、 エ ネル ギー 補給 
タン ク な の だ 。 青い ブロ ッ ク に 触れ る 
と エイ ラー の スピ ー ド が 2 倍 に な っ て 
し まう 。 エイ ラー は 、 ど ちら も まっ た 
関係 な く パ クッパ ク 食 べ て 追っ か け て 
くる ぞ 。 た だ エイ ラー も キミ も 和栗 (]) 
の キャ ラク タ だ け は 通り 抜け られ な い 。 
エイ ラー は [に ぶつ か る と 反対 方 向 
に 進み は じ め る の だ 。 


突然 、 画 面 が び ス フロ ー ル し て 最 下段 が 最上 段 へ 。 ほ 
が は すべ て 前 と 同じ 。 エ イラ ー は キミ の 階 ま で ワー プ 。 
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< 突然 あっ ちゃ ん > フー は 朝 ご は ん を 食べ る と 秘 ず 下 痢 する ん だ そう で す 。 お が し 、 お な が すい て いた の で つい 朝 ご は ん を 食 
べ て し まい 、 電 車 に 乗 つ て 学校 へ 向 ひ かつ て いる と 途中 で お な か が ピー ピー。 満員 電車 の な ひで モラ シマ と いう 鳴 で す 。 


ジン バ パソ コン で 楽し お 
《 ラ ング ケー ツゲ ー ム 

40 行 くら いし か な いか ら ラ ク に 打ち 
こめ る し 、 打 ちこ ん で か ら も な か な か 
遊べ ちゃ う 、 お トク な 『「 タ ー ゲ ッ ト 』。 

な ん だ か が か “きわめて” も の が 続く け 
と 、 こ れ だ っ て きわ め て ダー ツゲ ー ム 
2 に OS。 

画面 右 の 的 日 が け て 、 左 の 矢 を 放ち 、 
5 回 投げ て の 総合 点 を 競う ゲー ム が だ 。 

オォ オリジ ナル の プ 
ログ ラム で は 、 
表示 きれ て い 

る 矢 が 、 投 げ 
られ だ た は ず な の に 
画面 に 残っ た り 、 
大 の 飛び 方 が カク カ 
の し て だ の て だ けり ち ゃ 
ん が ちょ っ と 手 を 加え 
た 。 矢 の 飛び 方 は 途中 
か ら 放物線 を 描く よう に 
し て ある けど 、 飛 ば す カ 
に 応じ て は じ め か ら 放 物 
線 に な っ て 飛ん で いく よう 
に も 改造 で きる は ず だ か ら 、 
セ マ な 人 は や っ て みよ う 。 


レン と 高 さ 


と 
IO 


を 決め る 

XX イト ル が て 、 リ ター ンマ 
キー を 者 すず と 。 ゲ ー ム スター ト 。 
画面 下 で 棒グラフ が 伸び た り 縮 
だり も はじめ る 。 これ は 、 人 を 
及 け る 力 を 表し て いる の だ 。 適当 な 
と ころ で 、 ス ペー スィ キー を 放す と 、 
棒グラフ の 動き は 止ま り 、 そ の と き の 


アド ベン に 較 
い 高 校 2 年 生 


こん に ち は 。 山本 
来 久 で す 。 今 、 マ シ 
ン 語 と バイ ク の 勉 
強 を し て いま す 。 
冬休み 中 に 中 型 免 
許 を 取り た い 。 無 
理 と は 思 


か ? 載っ た ぞ ! 和 
アド ペン チャ 
ー ゲ ー ム に 、 め 邊 
っ ぽう 明 い 泰久 和 
て で て し た 。 て は 
Good lucki 


「 8 BE 8 8 8 5 3! っ 


優 攻 に 楽し む ダ ー ツ ゲー ム 


索 FDR FM- 
NEW グフ 77 


3 時 
% お Y / 罰 相 素 久 


グラ フ の 長き が 投げ る カカ に な る わけ だ 。 
次 に 、 画 面 左 で 矢 が 上 下 し は じ め る 。 
これ は 、 矢 を 投げ る 高き を 表し て いる 
の だ 。 も ちろ ん 、 高 いと ころ か ら 投 げ 
れ ば 、 多少 力 が 弱く て も 的 の 上 の ほう 
に あたる わけ だ ね 。 投 げ だ い 高 る に き 
だ た と ころ で リタ ー ン ・ キ ー を 押す と 、 
矢 が 飛び は じ め る 。 的 に あたっ た ら 、 
位置 に 応じ て 点数 が 表示 され 、 第 2 打 
ヘー…ー と いう あか うに 5 拓 ま で や る 。 

5 回 投げ 終わ っ た ら ゲ ー ム オー バー。 


ハイ スコ ア を 記録 する と 名 前 も 登録 で 
きる ぞ 。 リ プレ イ は 区 キー。 

友だち と 交代 で プレ イ し て 点数 を 競 
う の も 楽し いよ 。 


テッ 
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< 突 然 あ っ ちゃ ん > エイ キチ の お うち は お 肉屋 さん で す 。 そ れ や も 問屋 さん な の で 、 家 に 帰る こ お 肉 び だ くさ ん あり ます 。 と きど 
き 、 お と うさ ん が まち が えて 、 エ イキ チ を 売 つ て し まい そう に な る ん だ 、 と オサム さん が うれ し そう に 言 つ て まし だ 。 


ヴ Z 


\/- ル コ /\/009- つ g@ 


束 場 に 電 も れる 数 字 を 据 り 起 ご せ 


ん SR 
に 巻き こま れ な い 
了 FOR FM- ア コノ リス ト っ 63 ペ ー ジ ょ うに 注意 し よう 。 爆弾 の 破壊 男 囲 は 
0 回 5 だ か らら 。 3 つ 分 は な れ て いれ は 安全 。 
2 NEW ア 7/ それ に し て も 、 こ の 爆発 シー ン 、 か ん 
系 半 訪 pY 潮 辺 暫 広 だ ん だ け と 感じ 出 て る ね 。 
と いう も の だ 。 この 気 の 安 ま ら な い 戦 場 を キミ 
小さ い 順 り ま わっ て 5 つの 数 字 を 探す こと に 
j) に 数 字 を る 。 1 一 9 の 数 字 か 52 
取 ろ つ れ た 5 個 の 数 字 が 、 平 原 の と どこ か に 埋 
3 め ら れ て いる の だ 。 
^ 貞 /。 テ ン ・ キ ー の [1 で ここ だ と 思っ た と ころ で 、[A キ 一 を 
左 、 |3I で 右 へ 移動 させ よ だ たき 続け よう 。 土 が 掘り 起こ され 、 
9 そこ に 埋もれ て いた 数 字 が ヌ ッ と 出 て 
上 空 を 音 も な く 往 復 し く 〈 る 。 多 く の 場 合 、 そ の 数 字 は 0 だ け 
て いる の は 、 も ちろ ん 、 と 、 こ れ は スカ だ か ら 無 視 。 
敵 の トン ボ 。 ひ っ きり な 数 字 を 取り 出す に は 、 ス ペー ス ・ キ 


し に 、 爆 弾 を 落と し て い ー。 これ で 背中 に 数 字 を 背負 っ て 洞窟 


ロ CBBAGE PATCH FIGURES nnnnnnn に 向かう の だ けど 、 ち ょ っ & 
Ha 待っ た 。 必 ず 、 小 きい 順 で な 


HHH 
DECDRE 
フッ フッ フッ 、 ぐつ 〇 


掘れ ども 掘れ ど いと ダメ な の だ 。 順番 が 違っ 
も O ば か り -… て いる と 、 ピ ビー プ 電 が し て 、 
連 ん だ は ず の 数 字 は まだ た どこ 
び べり 


か に 埋め ゆら れ て し まう ! 制 
限 時 間 に も 気 を つけ て ね 。 
あの キヤ ベツ 
の 関係 も な い 
* や な い ハ 
タイ トル が ちょ っ と サイ ケ 
っ 科 く て 、 人 が か な か いい と よ 。 
何 か が か キー を 押す と ゲー ム ス L 
ター ト 。 画面 の 上 に 表示 され て いる 、 
^CABBAGE PATCH FIGURES” と 
いう の は 、 あ の 「 キ ャ ベッ 畑 人 形 」 の 
ごと 。 が も 。 こ の ゲー ム よ と は ほぼ ほとんど 
何 の 関係 も な い 。 
0 の 並ぶ と ころ か 
ら キ ャ ベツ 畑 を 連 
想 し て 、 和 動 的 に 
人 た だ ん だ そう だ 。 
この ゲー ム の 目 
は 、 平 原 の な か 
に 埋め ゆめ られ て いる 
1 一 9 の 数 字 を 小 
さい 順に 掘り 出し 
右端 の 洞窟 へ 運ぶ 


ナッ チッ チッ 、 
や っ と あっ た と 
思っ た ら 9 か / 


見 つけ た よー / ルン 
ルン の 8 / 


〈DIGSON FIELD〉 早 ぐ べ A キ ー を だ だ いて 、 数 の 小さ いも の か ら 順 に 洞窟 に 入れ る 。 自 分 が も つて きだ 数 より 小さ いも の 
が ある と 、 地 面 の 中 に 埋 ま つ て し まう 。 ど ご どこに 埋 ま つ だ か は 、 よ ぐ 見 れ ば わか ガ る 場合 が ある の で 、 が ん ば ろう / 


後ろ か ら バ ブ が 
追 つ みかけ て ぐる 
いつ も 、「 こ れ で カン ペ キ だ ! 」 と 思 


ク 


っ て ブロ グラ ム を 作る の に 、 し ば らく 
遊ん で いる と 、 
Illegal function call in330 

な ん て 出 て し まっ て 悩み の つき な い 
プロ グラ マー が 見 そう な 愛 を ゲー ム に 
し た 感じ (すご 〈 長 い 形 容 節 で し た )。 

それ と も 、 今 月 号 は 絶対 に バグ が な 
いと 自信 満々 で 本 屋 に 送り 出す の に 、 
発売 し た と だ ん ひんしゅく 《 の パグ ク 独 
摘 電話 の か か っ て く 〈《 る テク ポリ 編集 部 
の 見 そう な 夢 を (ここ まで が 目的 語 ) ゲ 
ー ム に し た 感じ か な 。 

いずれ に し て も 後ろ か ら 追 っ か け て 


くる バグ を ダイ ナマ イト で 壊し な が ら 、 


マコ が ポイ ント を 取っ て いく ゲー ム 。 


一 筆 描き の つも り の 


で 蛋 重 に 進 や つ 
[416| キ ー で 左右 、 [8I5 放 一 て で 上下 に 
パコ を 動か し て 、 通 路 の あい だ に ある 
ポイ ント を 全て 取っ て いこ う 。 だ た だ し 、 


江 テ ッ ー 
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WAN 
湾 


38 FDR FM- 


FNY{ 


CN ん // 
う *% AX 3 


AS 
Ss 2Y 0064Z 
OH 


2 バラ 人 は 汰 イン ト を 取っ て し まっ た だ 道 に 
は 進め な い の だ 。 や っ て みれ ば わか る 
だ 、 和 まる に ーー 香 きき て ポイ シ ジ ト を 
取っ て いか な いと 英 動 き 取 れ な く な っ 
Ci も だ らら 

し か も 、 フ パコ ユ が 通っ た あと の 道 か ら 
バグ 発生 。 も ちろ ん 、 バ グ に つか まっ 
だ た だ ら ア ツウ ト 。 

バグ を や っ つけ る た だ ため に 時 限 発 火 式 
ダイ ナマ イト を スペ ー ス の キー モッ 
ト し ょ よう 。 ダ イナ マイ ト の 破壊 男 囲 は 
3 x 3 だ 。 首尾 よ く 、 ポ イン ト を すべ 
て 取れ た だら 、 リ ター ン ・ キ ー を 押し て 、 
次 の ステ ー ジ へ 。 

これ は 一 筆 描 きど だ か ら 、 ユ コー ス を ま 
ち が え る と も う 面 クリ ア は 不可 能 に な 
8 定 も まつ の の まで 0 の 0 し し て 
いる の が いや な ら 、 こ れ も や っ ぱり リ 
トー デン ッ ポー。 

自殺 キー で も ある の だ 。 

ポイ ント 1 個 2 点 テク ポリ は 100 点 。 
バグ を や っ つけ る と 50 点 。、 ノ ー ミ ス で 
クリ ア な ら 1000 点 。 た だ の クリ ア は 300 
点 。 残 り ダ イナ マイ ト 数 も ボー ナス ポ 
ネル シ ンド に な る ぞ で 。 


< 突然 あっ ちゃ ん > 今 、 ゆ みち や ゃ ん の 頭 に は ハゲ が あり ます 。 ス キー で 頭 を ケガ し だ か ら で す 。 本 人 は と て も 気 に し て いる の で 、 
みん な で 内 緒 に し と こう ね 。( 率 内 緒 に な つて な いち ゅ ー と ん じゃ ! 凛 ) 


パコ を バク が 追い か け て ぐる / 


太 リス ト っ 
64 ペ ー ジ 


マ ん な わけ が な い 。 や つば ぱ ば り の 追い か ガ け て きだ 。 
し か し 、 フ ッ フ ッ ツ 、 時 限 爆弾 し か がけ だ も ん ね 。 


FANIC 
# H-SORE $ 
9906 
を SU 棄 # 
132 
514 計 4 


を LEWL# 


4 ドカ ー ン 、 バ ブ 退 治 成功 / さ 、 キ ー 操 
作 を ミス し な いよ うに 一 筆 描 き 一 筆 所 き 。 


ー へ こざ rv 盾 邊 


た Jcrb SIx ド ルト 


> ソ 


s+ で 9tA/ 対 2 
/ BBH 』 月 HI 上 上 上 8 8 上 BE 上 BI BI 8 8 ょ 


つか で 4 ご は SS( ( 守 
へ 9t し て 二 
柱 革 オロ rrCSW は 
科 9 
S は さゆ は て 生計 短 
せり 漆 の 二 


S の 次 は 一 (v 
…S と と パ っ ポー 


owryS ボ 。 ツ ぴー で の ひ 了 NFNNH ロ 


WW 8 き R 昌 昌 B 8 B  】 


ヴ マ ば 


\/-W コ @ 川 


1 計 i-SCORE 
1 の 9 (る @C) 


9 て (ge@C) 


4 太陽 消し レス ター ト 。 下 の ほう に ある 太 陽 
が 京 滅 太陽 ( 今 、 消え よう と し て いる 〉。 


太陽 を 消す に は 、 
ツイ ニン ワ ガ 
PSePNet 和 2 な 


か の 1 つ だ け 、 点 減 し て いる の が ある 
er 
作 す る キャ ラク タ が だ 。 

ゲー ム の 目的 は この 太陽 を 全部 画面 
が めし で て し まう こと だ 。 
[214I6I8|I キ ー の うち 1 つ を た た 〈 と 、 
点 減 太 陽 が 下 、 左 、 右 、 上 の どれ か 1 
つの 方 向 に 走り出す 。 I5| キ ー、 ま た は 
スペ ー ス ・ キ ー を た だ た だ 〈 と 止ま る 。 基 
本 操作 は これ だ け 。 

点滅 太陽 が ちょ うど 消 
えて いる と き に これ を 移 
動き せる と 、 太 陽 は 残 6 
な いけ れ ど 、 出 て いる と 
き に 移動 きせ る と あと に 
残っ て し まう ( 右 の イラ 
スト も 見 て ね )。 

だ か らい いか げん に や 
の いる た 、 の つら ょ いう 
ま に 画 面 は 太陽 どら け に 
が つて し まう の だ 。 
キミ の 太陽 が ちょ うど 消え る と き を 
知 は が か ちっ て 、 デ ン ャ キー を た た さき 、 
別 の 太陽 に 重なっ た と ころ で スト ッ プ " 
(5| キ ー ま た は スペ ー ス ・ キ ー)。 こ の 手 
順 で 太陽 が 1 個 消 を た こと に な る 。 を 


4 げ げ つ 、 


か えつ て 増やし ちゃ や つ だ / 


プ ナ イノ ナ 消え て ぐ 、 お か し な 太陽 


い 1 


い ム で 


ミ FUH FM- グ ヨ / 文 リ スト ュ っ 66 ベ ペー ジ 


Ju4 // 
ぢ Y yog/ ん 


dE IL IE IE IL IL I WI Ii 


RE 


られ 
ひので 


ン こく 
Re 
23」 
0 


』 る 
も 1 
『 当 彰 は 不 
よ な め KW 
J うる ま も ! 
に ま し や き 
邊 動 え て ん 邊 
W か の | 
| せ 作 y 現 
% すず 品 o わ 和 
W て り る 』m 
B 1 PS 
1 ぁ s 近 ん 入 - ・ 人 を 
ョ ma と いい に だ よ と で て の の - こ ん 
方 て まし れ |1 す も し は これ も 上 
誠に す て だ ドド く 前 た た ろ は 60 
1/ し ら を す 中 CS っ! 
『 MM つま け よ 上 朱 ー チ ガイ | 
See! 


つい いる B 寺 に 后 
いる と あと に 6 まっ 


HI-SCORE 
ら り (5 ら 6C〉 


9 て (SC) 


邊 スラ い 3 時 に 


し ト 】 
こら まだ 、 同じ よう に し て 、 別 の 夫 + ね nH 届 を ば … 


際 に 重 な れ ば 2 個 消し た こと に な る 。 
この 繰り 返し だ 。 最 後 の 1 個 は 、 残 き 
な いよ うに 移動 する だ け で 消滅 する 。 
これ て 完成 だ 。 


< 突然 あっ ちゃ ん > えー と 、 最 後に バンプ の 鳴 で す 。 パ ンプ は むか し オフ ロ 嫌 い だ つ だ の に 最近 は よこ オフ ロ に 入り ます 。 ご これ 


ヴ タ も あの 談 の 電話 の せい で し よう か ガ 。 ぽ くに は よく わか り ま せん 。 


芝 ツ 
何 


クン C 光 フン バン バク ー ム 


と と <0 
ヽ 
D 


衣 BASIC-G 
AS 
本 PY 藤光 半 人 


1 ( 
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1 lm ー 1 、 先 に パワ ー 0 に な っ た ほう が 決 閲 
な ん いく 表 P 2 も 全く 同様 に 、 区 て 左 回 転 、 口 ” に 破れ た こと に な る 。 

1 まし か 2 で 右 回 転 、 両 方 押す と 前 進 。 弾 発射 は P 1 と P 2 が ぶつ か っ た ら も と の 位 
『 ほ 傘 系 | SHIFT キ ー だ 。 置 へ も どり 、 同 時 に パワ ー 0 に な っ た 
だ は 間 』 。。 Pi、P2 に も 5 画面 の 端 か ら 出る と ら 、 引 き 分 けり 。 そ れ に し て も 西部 制 ^ 
Go い 年 る ! 。 反 寺 側 か ら 出る よう に な っ て いる 。 ー ド 満点 の ゲー ム な の だ 。 
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ンク ー ム さい 

宇宙 戦争 ゲー ム を 見 て 、 ガ ンマ ン の 
対決 ゲー ム を 思い つく な ん て 、 ち ょ っ 
と 珍し い 。 こ の ゲー ム は 、 ポ シェ ッ ト 
Vol.2 の 『Space Battle』 を 地上 版 に 仕 っ 
立て 直し た も の な ん だ そう だ 。 ムン 

2 人 用 だ か ら 、 だ れ か 相手 を 連 や マン 
れ て き て 、 と な り に 浴 ら せよ う 。 そ 
こ で RUN。 

画面 に 向かっ て 左 は プレ イヤ ー 
1 。 右 は プレ イヤ ー 2 (以下 、P 1 、 
P 2 と 略す )。 

P 1 は 、[ で 左 回転 、I で 右 回 
転 。 弾 を 出す の は 、SHIFT キ ー だ 。 「 "し ロッ ヒド ' と や を 
つま り 、 皿 と EKI で 回 転 きせ て 、 弾 の POER PE ト Y 
方 向 を 決め る っ て わけ 。 前 進 する kaw 
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ぃ だけど 、 こ ん な 形 で 出現 し だ の 

に は 耳 BPI 勝 仙 だ 。 も 
講和 Se 2 う 1 回 、 や 
参考 作品 と 違う と ころ は 、 キ PDMEE : ろ ラ ザ /,」 

ー を は な せ ば 止ま る こと 。 
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果 人 1 セ ワ カレ ー の 辛 ロ が お いし いし 、 タ バス コ こ らい ど つ て こと な いし 、 そ れ か ら メ ンタ イコ も 大 好き よ | 
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2Kー22 の ガ は ひび 
き が 楽し め る 
「XX 1 て 頭 を 使う ゲー ム が 少な い の で 、 
4 人 ポー カー を 作り まし た だ た 」 と 作 基 。 
240 え を は そう が な 。 

で 、 こ れ は ユ コンピ ュー タ 3 人 相手 に 
戦う 4 人 ポー カー と いう わけ だ 。 役 は 
も ちろ ん 、 レ イズ (賭け 金 を あげ る )、 
コー ル (現在 の 賭け 金 で 勝負 )、 ド ロッ 
プ (お り る ) の で きる 本 格 タ イブ? 

ポー カー と いう の は 、 運 は も ちろ ん 
だ けど 、 レ イズ し だ た だ り 、 コ ユー ル し た だ り 、 
ドロ ッ プ し だ た りす る タイ ミン グ も 大 切 
が の ーー ム a 人 で こ が まだ お る し ト しのい の だ 。 
キミ も いっ ぺん これ で や っ て みよ う 。 


みん な は 「 ゲ ン 」 さ ん 
と 呼ん で ます 


えー、 ぼ く は な ん 
と 、 こ の 現代 で 、 英 
語 が 不得 意 な ん で す 。 
それ と 、 佐 藤元 さん 

の ファ ン な の で す が 、 

* 元 "は ' は じ め 」 と いう 
の で すか 、「 も と 」 と いう 
の て すか 。 ぼ て く は 、'「 も と 」 
さん と 読ん で いま す 。 
(編集 部 ニュ ー ス ・ 最 近 、 元 さん の F M 一 
7 用 プロ グラ ム を クー が 流 に し まし た ) 
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4 お ー つ 誠 な い 。COM. 1 も フル ハウ ス だ つ だ の か ガ 。 で 


も この カー ド な ら 、 ボ の 勝ち だ も ん ね 。 


の 少 高い 手 役 ガ が 
(ラン ンー バン バン で きる / 
ゲー ム の 説明 の あと 、 い よい よ プ レ 
イィ 開始 。 カ ー ド の 右 横 に 矢印 が きたら 6、 
や さき の 人生 だ 。 
カー ド 1 枚 ずつ に I1I2I3I4I5| の キー 
が 対応 し て いる 。 切り た い 札 の 番号 を 
押せ ば 、 押 す た び に 1 枚 ず つ な く な る 。 
この バー ジョ ン で は 、 ま ちがっ て 切っ 
て も と りか え し が きか な い 。 札 を 捨て 
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る と き は 慎重 に 。 
いら な い 札 を 全部 捨て た ら 、 [9] キ ー 
で 補充 の カー ド が 手 に 入っ て 〈 る 。 
こう し て 、 3 回 まで 、 カ ー ド の 入れ 
かえ が で きる 。 3 回 も 切り か えて る と 
か な り 高 い 手 が で きる か 
ら 、 当 然 、 勝 負 も 相当 ハ 
イレ ベル な も の に な る 。 
な ん だ か 、 ポ ー カ ー の 
達人 同士 の 戦い に みた い 。 
3 回 、 手 を 入れ か 
えて か らい よい よ 勝 
負 。1 | が ドロ ッ プ 、 
I2 が コー ル 、 |3| が 
レイ ズ の キー だ 。 勝負 を 
放棄 する と き が |1| 相手 
の レイ ズ に 応じ る の が |2I 
も っ と 賭け 金 を あげ よう 
256 の の %8。 だ だ し 、 
レイ ズ は 1 回 に 10 ド ル ま 
で 、 賭 け 金 は 1 勝負 に つ 
き 1 人 最高 20 ド ル ま で と 
決め られ て いる 。 健全 な 
ノレ ー ノ ルレ アデ 。 
最後 に レイ ズ し た プレ 
イ 4 ヤー 以外 全員 が コール 
まだ は ド せ タプ トル だ り 、 
賭け 金 が 20 ド ル に 達し た 
りす る と 、 い よい よ 各 自 の 手札 れ オ ー 
プン 。 役 に 応じ て 判定 が 下る 。 
親 は 、 勝 っ た と き に 子 か ら 賭 け 金 の 
2 倍 を せしめ られ る けれ ど 、 逆 に 親 が 
負け た と きも 賭け 金 の 2 倍 を 払わ な 〈 
ちゃ いけ な い 。 その 回 の 勝者 が 次 の 回 
の 症 に な が っ て い (、 容 カシ ステ ム だ 、 
こう し て 、 9 回 勝負 。 9 回 と も 終わ 
る と 9 回 分 の 役 を 表示 し 、 勝 数 に 応じ 
て ボー ナス が 加算 され る 。 
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? マー ク の つい た 青い ウン シン さん が 4 
頭 画 面 に 出 て くる 。 こ れ が 問題 。 4 桁 
の 異な る 数 字 (0 一 9) を あて る わけ だ 。 
適当 に 4 桁 の 数 字 を 入力 する 
と 、 画 面 が 消え 、 再 び 、 入 力 
た 教 1 る 1 つ に ソン が の 
いて 現れ る の だ 。 

数 字 に つい て いる ウン に は 
3 種類 いて 、 そ れ ぞ れ が その 
上 の 数 字 に つい て 、 次 の よう 
が か ご た る や 寺 た て くる 。 
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ウミ が ビン トド 違う けど 、 を の 数 
を 与え て ぐれ る 字 は どこ か て 使わ 

人 年 が ウシ 年 だ か ら 、 な の か な 。 こ れ て いる 。 
の ゲー ム は 、 わ り と むか し か ら あ る 数 ⑧⑩ 自 い オ ウシ ーー 


あて ゲー ム に ウシ さん を 登場 させ て 、 桁 も 数 字 も ピッ タ 
ガ ゼ ン 楽し く て な っ て いる 。 リ 1 
RUN ミ せる と 説明 が 必要 か と どう か 聞 ZS の の センド で 
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ダメ ー ジ が 100 に な っ だ た り S) 
ボビー に つか まる と キャ タダ 


ビー が 1 減っ て 、 残り が 
0 に な る と ゲー ム オ ー バ ー。 2 の 

メロ ン は 1 個 10 点 、 10 個 4 こい の 93 韻 y 
食べ る と 1 画 ク リア て 次 の 面 へ 。 ダ メ X ロン 
ー ジ が 330 以下 びと キャ タビ ピー の 数 ヵ 
四 え る ぞ 。 
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の 6 TP 。 ご は いつ ば ぱい 食べ ちゃ うし 、 途 中 ひら ずる ずる つと 落ち ちゃ うか ら 、 見 て る ほう は スリ ル あ る か も ネ 。 


炎 条 思考 型 ア クシ ョ ング ツー ム 


太 リ スト っ 
73 ベ ペー ジ 


テー デュ ン ン ーー イン 
導 PY 豆 蘭 泰 学 


/e / 反射 板 を 使 つ て U 
4 F 〇 を ね らい 撃ち 
画面 を 見 た 感じ で は ちょ っ と わか り た 、 お スミ 付き の な も し ろ ゲ ー ム な の 
に くそ うに 見 える けど 、 例 の テク ノボ だ (も っ と も 、 ク ー が いろ ん な コメ ン 
リス に ある プログ ラム 評価 表 に は 、 た ト を 手抜き し た と いう こと も ある が )。 
だ ひと こと 「 き いよ ー」 と 書か れ て い 画面 の あちこち に 散ら ば る 、 ス ラッ 
ジュ (/ ノ ) や スラ ッシュ (いい ) 
の の の 2 の の ボー て 
いつ は 、 あ の 人 不 減 の 金属 バ 
6 も MYt。 この 
に あたる ミ サイ ル を 90 度 
IN 
下 の 砲 双 か ら ミサ 

1 発射 (スペ ー ス ・ 
キー) も て 、 こ の パッ ツウ 
ンダ ー ウ ォ ー ル で ユー ス を 
変え 青色 の UFO に ぶち あて 


H【- こ SCORE : 269 


寺 9 記 


人 らら CORE : 2 の はら 9 持 【 人 SS・4 


4 今 、 キ ミ は 矢印 の 先 に いる 。 バウ ンダ ー ウ オー ル 
を な ら べ ガ え 中 / 


ら CORE : 2868 け は こら SC の ひ に RE :  Z@6 ら 人 の 


は 4 人 に に 0 滞 し し * 
4 な に を や つて いる ガ が わか が ら な いつ て …… まあ 、 | 
見 て いな さい 、 ま が せな さい 。 


1ー ら CORRE : 2988 


SN 


SCoRE : 2989 失 1SS :4 


4 よし 、 ご これ て 完璧 だ / 今 に 目 に も の を いわ せ て 
や る 。 KG の て ム Sa ( * 一 く プッ シュ た 


と する こと が ある ん だ けど 、 そ の と き に 頭 を 働け せ て 、 作 戦 を 考え よう 。 


け は まほ ーS ら CORE : 298 ら 9 


く BOUNDER WALL し > 反射 を 利用 し て り F 上 〇 を だ お す な ん て 、 に こい ゲー ム だ ネ 。 相 手 が 自分 の 動き し よ つ て 、 じ いつ 


は 
、 
負 


「 導 
| た ッ る 章 ーー 
l の ト 選 び ま は 
で 4 を い 崎 
還 、 細 6 本 テ ぉ ど 県 
本 目 ク ぼっ の ! 
| 幼 目 ”" ポ え / 中 
1 す ク 病 き 党 ーー- 
| - ボ の ら 連 | 由 
| 議 ml おり 豆 に に グ 
上 か 1 依 了 な ニョ 
WI 本 ま ミリ と ] 
き 寺 ツ つう ム た 
『 い 見 | も て ふく ま 凶 で えつ 訂 
WW いる べ な いん で 誌 す に ぁ 学 
『 さ 人 ツ か まそ 学 1 な る 生 
mW っ も の に すり 級 本 ポ ボ っ こ 大 
上 / : 目 は 返 で 填 シ て と 臣 『 
| ーー ィ ーー き 
1 / 


る 。 そ れ が この ゲー ム の 目的 だ 。 
@ 地雷 や エイ リア ン に 
⑨ | は 気 を つけ て 

も 5 ちろ ん 、 た だ その まま で は ミサ イ 
ル が どこ に 行く や ら わ か ら な い 。 を そこ 
で 画面 の な か を 自由 に 動き まわ れる キ 
ミ (人 の 形 を し だ キャラクタ ) が 、 バ 
ウン ダー ウォ ー ル を 動か し て 、 ミ サイ 


ル が 無事 UFO に あたる よう に コー ス を 
作っ て や る わけ だ 。 
移動 は カー ソル ・ キ ー。 バ ウン ダー 


ウォ ー ル に 向かっ て 押し て いけ ば 、 を 
の まま 素直 に 動い て くれ る 。 

た だ し 、 画 面 中 に ば ら ま か れ た 地雷 
(*) に あたる 0 
う ぞ 。 それ だ け で は な い 。 人 不気味 に 
ミ を 追っ か け て < 0 
イリ アン に つか まっ て も アウ 
Ma 

も う ゆ ひと の 、 ミサ オル が 6 
FO に あたら ず 画 面 か ら 出 て 
し まっ て も アウ ト 。 3 回 アウ 
ド て ププ ュ ン シ ジ 、 じ ゃ な か っ た 
ゲー ム オ ー バ ー。 

UFO を や っ つけ る た だ びに 
UFO の 数 が だ ん だ ん 増え て 
星 し て な っ て で る 。 で も 、 考 
先 だ た あり 記さ 
サイ ル が は ね か 
つて 次 六 に 
FOO 撃ち 落と す 
の は 快感 だ よ 。 


紅 ま 8 合え 


ム ほ ー ら ね 、UFO を 次 々 に や つつ け て 、 最 後 の り 
FO も 撃墜 確実 だ / 


レル / 


溢 00/- グ W/ 央 / 多 


@) カイ オ 星 を 舞台 に 
し だ 宇宙 冒険 / 
< 作者 自身 に よる コマ ー シ ャ ル > 

楽 さ も 吹 っ と ぶ 、 お も し ろ さ / 

メメ メ 年 、 地 球 と ガイ オ 星 は 戦争 
状態 に あっ た 。 ス ペー スガ イオ が この 
江 省 に 終止 符 も 打つ た め の 最 終 兵器 を 


CZ 
発 中 で ある こと を 知っ た 、 ゎ が 地球 閉 計 FUR MZT000/ 
車 は 、 さ っ そく 、 ス ZY4 よし て キミ を 2 gUD MZ-1/001 


パム に 9 上 人 AR >y 万 演 を 
送り こん だ の だ が 、 あ っ け な く 捕まっ 問 謙 多 括 次 案 


HI-SCORE B 
Hf 6891 
STRGE 2 
TIME 8S3 


2121212] 
けけ 


モル まる だ 。 だ が 、 
キミ は 困難 な 脱走 を 
成 し と げ 、( な ぜ カ ヵ ) 
廊下 に 散ら ば る 秘密 書類 を 取っ て いこ 
う 。 見 張り 兵 も ぁ ワ ー プ 、 穴 あけ て 追っ 


4 石 下 に いる ~# "ガキ ミ 。 今 、 ま さ に エレ 
ペー ター 乗 づ うと し で いる と こう 。 


て くる ぞ .,/ キミ は 全 5 面 を クリ ア で 
きる が か が./ ( 堀 沢 文書 より 妥 約 ) 
時 間 は 1 分 。 
の し の 上 
だ いた い 、 こ の ゲー ム の 概要 が お わ 
が か * り USM に と 届 う 
SPACE GAIO と は 地球 の 宿敵 星 ガ 
イオ 年 に 住む 種族 の 名 前 な の だ ろ う 5。 
まだ た 、 な ぜ 秘 密書 類 と も あろ うお ゎぉ 方 が 
を そこら 中 に 落ち て いる の だ ろう と 不 思 
議 て は ある が 、 仁 義 と し て 、 
ここ て は 深 て 考え ん な いよ うに 


4 エレ ペー ター は さす が に ラク チン 。 で 
が いな い ガ が ら プ ザー は 鳴ら な いし 。 


HI-SCORE 8 
SCORE 84183 


STAGE 2 し まう 、 
TIME 849 キミ は 画面 上 の 7 だ 。 北 
L_ 症 本 | は 、|416 キ ー て 三石 に 動き 、 
( mm | スペ ー ス ・ キ ー て 自分 の 真下 
に 穴あけ 、 穴 埋め が で きる 。 
た だ し 、 穴 埋め の 場合 は 右 下 
か 庄 下 に 床 が な いと で き な い 
し 、 穴 あけ は いち ば ん 下 の 床 
て は て き な い 。 この 2 つの 技 
[ 。 と 、 ず っ と 自動 で 動い て いる 
4 エレ ベー マター ガ ら 出 て 、 い ざ 秘 密書 類 へ 。 お っ 、 ガ イ エレ ベー ター を 利用 し て 、 上 
オ だ ち が 追 つけ て きだ 。 下 左右 に 場所 を うつ りな が ら 、 


12 の ね 日 
し 2 


六 


エレ ベー ダー を 駆使 し て 書類 を 盗め 


太 リス ト っ 
75 ペ ー ジ 


秘密 書類 (L) を 拾っ て 
KO 

し か も 、 ス ペー ス ・ 
ガイ オ の 友 膚 か ら 放 出 
され る 物質 YGAIO SO 
AP は 有害 な の で 、 行 
動 で きる 時 間 は 1 分 し 
か な い 。10 秒 前 に な っ 
たら 、BGM と ブザー が 鳴る 。 

追い か け て くる SPACE GAIO(X) 
も 鋭く 迫っ て ぐる 。 だ が 、 半 に は X メ へ 
の 反撃 手段 が な が い 。 は っ きり いっ て 、 
逃げ る し か な い の だ 。 と に かく 逃げ ろ 。 
秘密 文書 を 全て 拾っ て し ま ぇ ば 、 面 
クリ ア 。 堀 沢 文書 に ある と お り 、 全 5 
面 あ る の で 、 気 を 強く 持っ て 、 し っ か 
り グ リア も てく な だ よ 。 條 に 、 所 に 
する こと は な い 、 面 が 変わ っ た ら 、S 
PACE GAIO は ます ます 鋭く 〈 な っ て 、 
ゲー ブ し だ た り 、 容 を あけ た り し て 、 ふい 
よい よ 激 し く キ ミ を 追い か け て くる だ 
け な の さき 。 

5 面 に 行く と だ ま に 絶 対 に 書類 を 取 
れ な く な る 場合 が ある 。 5 面 で は まず 
画面 の 隅 に ある 書類 か ら 取 っ て いこ う 。 


NN BN N WNW W WI WI W 8 W 8 上 


4 6 
し を で 
W ンー ペン 一 か すこ 
1 ぎ ュ グ の 
1 ー ン 0 ま 面 | 明 m 
「/ の oo) 朋 
Wi < ヽ 二 引 
」 4 5 
て う 間 拓 で くっ 計 
W [ と きも 早 き 
和 の まく りり ク 』 
5 戦 す 急 ク い リョ 
『 計 そこ が た だ た っ! いこ きり っ っ ョ 
mg 校 れ の 5 り 0 た 0 て 5 す ア て イズ ョ 
m は に 道 耐 すり の す 面 ぎし か の 
sm に し で て ク 2 る 頭 ( は は て ん コ ョ 
ョ ma し に て す リ ニ 乗 に G 死 得 た ン 
6、 5 7 と せ 乗 人 時 を 京 ん 上 


に らし つの から 胡 が こる と ビエ シッ て な 気分 じ な の ます 。 


重 、 SPACE GAIO〉 エレ ベー ター で 上 が り 、 穴 を 掘 つて そこ か ら 落 ち 、 秘 密書 類 を 取る ゲー ム 。 エ レベ ー マ を 待つ て いる と き 


Ps 和 ニカ | 見 邊 に 9 
ミー クン と マチ ル タ の 恋 物 語 ーーーーーーーーーーーーーーーーー。 
mA の く 引 
WWB ア て し あの 和田 く | 
EmY ル も と 思 が る た 
E  /* ら の 9 
を ム くい 好 ザ は ョ 
「 赤 ES 大 き ン と 
用 : ま な オ て 和 ョ 
で と 2 | も 
せ の 、 男 ル シ 
WW て な の うっ 
5 3 す 
が < > の こん 
3 計 FOR MBX 16K リス ト っ 77 ペ ー ジ 1 まる す 
役人 お Y 甘 盛 偽 如 ョ ル ん 和信 
< マチ ル ダ を 押し て WSB も 借 て 
いつ て 、 謎 の 出口 へ 6 、 』 
ー CIL LILLLLLLLLLLLLLL っ 
向 ガ え 。 
だ CLOAUD で て 0 よう 。 
る て 、 寄り 道 は 終わ り 二 
ー ム スタ ー ト 
カー ソル ・ キ ー で 、 ネ コ の 
ミー クン を 動か し 、 人 恋人 の マチ 
ル ダ を 救い 出 を う 。 出 日 は 、4 つの 
隅 の うち どこ か 1 つ に ある 。 出 日 で な 


つて 記 、 画 
交 と ブロク グ クラム SAVE し だ 6 も 
の を 改め て LOAD す る と き 
ー タ は マシ ン 語 で 入っ て いる の て 、 ( 


いと ころ に マチ ル ダ を 連れ て いく と 、 
また 別 の 場所 に ワー プ し て し まう ぞ 。 
の 注意 。 画 な お 、 ミ ー ク ン は 押し て いく こと し か 
き な い の で 、 持 っ て いき 方 に 注意 
な いと 了 困る こと に 


まず は 画面 作成 が 面 デー 


ら は じ め よ う / 
デモ 画面 で 2 を 選べ ば 、 ゲ ー ム スタ 面 デ 
ーー トド 。 だ だ し 、 9 ペデ ジ を 見 て 、 画 面 BLOAD DATA* で 行う こと 。 デー タ 


人 まる 。 
を あら か じ め 作 っ て お か な いと 遊べ 7 を 入れ て か ら 、BAS の 9 ジ ノ 種 類 の モン スヤ 
い の て 注意 。 IC の プ ブログ ラム ンー ー が 次 々 に 出現 
モン スタ ダー は 、 欠 違い で 全部 て 
7 種類 登場 する ぞ 。① 由 色 一 ふつ 


う の モ ンス ター② ピ ンク ー 縦 方 向 
- は 2 倍 の スピ ー ド て 進む ③ 牙 色 
ー 娠 を 食う ④ 赤 色 一 横 方 向 に は 
2 倍 の スピ ー ド ⑨⑤ 水 色 -① が 
消 を た り 現 れ だ た り (⑥ 穫 明 ./ 一 
た だ し 和 足跡 を 残す ⑦ 緑 色 -② 
+③+④。 
ミー クン は モン シス ダー を 
や っ つけ る こと は で き な 
ぃ い 。 た だ だ 、 導 火 線 の つい 
だ ビン を 璧 に 1 回 押し 
つけ る と 、 時 限 爆弾 に 
守る の て 、 造 こ ご こき 
きこ め ば (3 x3 キ 
ャ ラク タ の 男 囲 ) 、 
40 秒 間 、 気 絶 さ せ 
2 0「 で いき 
る の だ 。 
オノ は こ 和 れ 
を 押し つけ る 
と ブロ ッ ク が 
人 生 売 る 。 


ッ ス ツ 「「『 


〈 マ チル ダ BABY〉 ミー こん が か わい い ネ / モン スタ ー は ワー ルド カッ ツ プ の マー ク に 似 て る / みん な は 、 ご ん な 


と 思う けど 、 自 分 ひか ら へ ん な と ご こ に 入る と 自殺 行 


為 に な り ま す 。 さ て 、 そ れ は どこ で し よう 


スレ しない 
ピタ 


I 川 | BMW ま 000g- グ W 旬 


タウ 


前 と 後ろ る から 

英機 が 攻め て ぐる 
2 上 し ない 戦い とい ん は 、2N ツ コッ 
の あの ほとん ど と が そう だ ね 。 と きど 

き 、 パ ソコ ン が ギブ アッ プ す る ゲー ム 
が ある に は ある けど 、 た だ ま に は 全面 ク 
リア を 果たす と 突然 ディ スプ レイ が 爆 
発する と か 、 パ ソコ ン が 火 を 吹く と か 
そう いう 元気 の いい の が ほし いね え 。 
(ある か 、 そ ん な も ん 『!) 

RUN す る と 、 タ イト ル 画 面 が 出る の 
て ペー スッ キー も だ だ いで 、 ゲー 
ム ス タ ー ト 。 

ジョ イス ティ ッ ク 、 カ ー ソ ル ・ キ ー 
の どちら も 使え 
9 

画面 に 浮か ぶ 
宇宙 戦士 上 下 
左右 に 動か し て 、 
前 か ら 後 ろ の か ら 
や っ て くる 敵 と 
戦 お う 。 


ぁ 前 ガ ら 瑞 、 後 ろ 
か ら 敵 。 だ が 、 落 


4 ズ ガ ー ン 。 や つと や つつ け だ 。 し か し 、 上 空 の 敵 も も うす ぐ 攻 め 
こん で きそう 。 


タン ング の クジ クン ク タク 
ち つ いて 攻撃 / Ceec ko の 


ユーノ 


前 後 の 敵 と 戦い な が ら 次 の 基地 ヘ へ ノ 


誤 FOHMSX 8K 
半 絡 pY 圧 立 再 乱 
あま り 前 に 行き すぎ る と 、 と っ さ の 
と き に 困っ ちゃ うし 、 後 ろ に 行き すぎ 
2 
を や っ つ 選 持 、 中 
Hi 
タン )。 敵 に 3 回 が つか る と 、 ゲ ー ム オ 
ー バ ー に な る 。 
< の 輝く 星 は 
ジー 面 グ リア 数 
だ れ か が チョッ プリ フタ ーー みたい“ 
(アッ プル の ゲー ム ) と 叫ん だ の は 、 し 
ば らく 進ん で 基地 が 出 て きた と き 。 
ENDLESS と は いえ 、 と きど きき 休憩 
が ある の だ 。 よ か っ だ わ 。 
基地 に た どり つく と 、 1 ステ ー ジ ク 
リア 。 左 上 に 星 の マ ー ク が つい て 、 ク 


タン 


文 リ スト ュ っ 
79 ベ ページ 


グー し だ 胡 チ 
ー ジ 数 を 表示 し て 
4 YY あっ 

や っ て みて 、 ち ょ っ と 動き づら いな 
…… 思っ だ 人 は いる だ ろう か 。 作者 
に よれ ば 、 それは 「 地 上 の 戦い 」 だ か 
と の こも 。 

字 由 で は 空気 の 抵抗 も 重力 も 関係 な 
( 目 由 に 動き まわ れる けど 、 さ す が に 
地上 だ と いろ ん な 制約 が ある の で 、 を 
の 感じ を 出し て い る の ) だ ろう 。 

来たし て 、 本 当 に 感じ” を 出 
め な の か 、 単 な る 言い わけ か ーー 一 永遠 
の 謎 の まま 戦い に は 果て し な く 〈〈 く 。 
これ で も 彼 は 中 3 の 受験 生 で す 』 

実は ね 、 第 5 号 を 買っ て 喜ん で いる と 、』 

な ん と ! この 作品 に そっ くり の アイ デ 邊 
ア の ゲー ム が 載っ て いる で は な いか ! 
うー ん 、 先 を 越 さ れ て し / 
まっ た 。 で も 、 い いも ん 
ね 、 ボ ク の キャ ラ は 
オリ ジ ナ ル だ も ん ね 。 
SS の ね ここ A 
: まい つた か 

ちな み に 4 回 
連続 採用 は ボク 
だ け 。 


人 


1 _ B 見 W 見 見 WW 旧 月 WW 交  W 上 W 見 


S む と 0 鬼 だ  : な イマ の 人 


に に 内 に の 
で 、 さ ら に 続く 果て し な き 戦 い 。 


江 テ ラビ 
静 個 ! あ 


加代子 さ ん に お 答え し ます > 1 つ は 編集 部 の ミス で す (バブ 通信 参照 )。 ご めん な さて い 。 も う 1 つ は 打ち こみ ミス だ ろう な あお 。 
・ や の や" 〇 "な ん か を も う 1 回 チエ ッ フ し て みだら どう か な 。 ど うし て も だ め な ら tel し て ね 。 


ブロ グ ァ 


か プ ェ ッ 


9 個 も ノリ ッ パ ー が つい て いる !! 


FOUR MSX 16K 


py YUK7C の 人 ーー< こ 


だ 小さき な フリ ッ パ ー を 操作 し て 上 に 打 
ち 返 し 、 色 と あっ た 棚 に 入れ て や る の 


が ゲー ム の 目的 だ 。 3 個 に な り … 
うま く 〈 く 、 毛 玉 を 棚 に 入れ る と 、 ま た … う うっ 、 お ぞ ま 
新しい 毛 玉 が 次 々 に 現れ る 。 は じ め は し い (と っ て も 上 難し か っ た の だ )。 
4 ム AN キー を だ だ こと 、N の フリ ッ パ ー が ご 1 個 し か な いけ と ど 、 フリ ッ パ ー が まん た 珍妙 。 


らん の と お り 、 プ ヨン と だ わ お の だ 。 その うち 2 個 に な り 、 で の 1 列 の キー に 、 小 き な の が 1 つ 1 


Qoo 
NNN 


ム あ だ つ 、 1 個 ミ ス 。 右 の 隅っこ に ボー ル 
を 入れ な いよ う 、 回 キー で ガ ん ば れ 。 


つ 対 応 し て いる 9 フリ ッッ パー 方 式 ! 

し か も 、 な が ん と た 、 あ ん まり だ だ きす ぎ 
る と x が 出 て 使用 不能 に な る お そろ し 
る 。 は じ め て この ゲー ム に 立ち 向かっ 
た キミ は 、 キ ー ボ ー ド の 前 で 途方 に 募 


と 9 個 の ミニ フリ ッ 
パー ガム ズ い 


YUKI 清 が また 変 な ゲー ム を 作っ て れる に 違い な い 。 私 が 保証 する 。 
ES 上 が ら 、 色 EUC り の りき ちな み に 、 画 面 右 下 隅 に 行く と 1 回 
らん ば きら ん (要する に 毛 玉 ) が 沙 ち が トド に な た ひま す 。 

て くる の で 、 画 面 下 に ズラ ッ と な らん 」 ノー ミス で 成功 する と 、 ボ ー ナ ス が 
も ら え る ぞ 。 
W 月 . 胃 W 上 見 R  W 見 見 見 見 軸 】 


_ 意外と ファ ン の 多い YUKIO 


冬 で す 。 冬 に は ディ ス 
プレ ー が うま く 動 か な い 
ん で す 。 そ ん な わけ で 、 
冬 は ディ スプ レー の 電源 
を 落と せま せん 。 冷 えて 
また 動か な く な る か ら 。 
また 秋葉 原 の ジ ャ ンク 屋 
を あさ っ て 、 今度 は カラ ー の を 買っ て こ 
よう か な 。 

(編集 部 ニュ ー ス ・ ち な み に 第 5 号 の アン 
ケー ト を 見 る と 、 い ちば ん ファ ン の 多 か 
っ た の が YUKI ツ です ) 


1 2 


|  】 8 3 W 5 8 8 N R 8 8 時 8 」 
| Il IM 8 MM 8  M BI IM  I BI  B BI jj 旨 っ 


と 」 
人 


つ 。 そ いで は さら ば 。( 立 これ イラ スト に 書い て あつ だ ん だ けど 。 イラ スト は も う 間 に あわ な いか が ら ま だ 騙 度 ね 六 ) 


2 5 < 東京 ・Mr. ス ズ キン > ゆみ さん と よー ご さん の だ ん じ よ う び は 8 月 14 日 だ そう で すね 。 じ つ は ぼ ぐ も そう な ん で す よ 。 お え ぇ つ ん ぅ 


X50@ 川 | 


| SHFTI キ ー を 押し な 
が ら 昌 を 押す と 、 ロ ー 
プ が ビ ピュー と 上 に 伸び 
る 。 同 じ よ うに し て 、 困 を 押 
す と ロー プ が ピュ ー と 右 に 伸び る 。 ロ 
夫 8 ー プ の ある と ころ な ら 6、 還 IIK 剛 キー 
内 FOUR JR- ら 00 た リス ト っ 62 ペ ー ジ だ け で 、 自 由 に 動き まわ れる よう 
競 計 PDY AM4G4 る の だ 。 
ロー プ を あちこち と ころ で 、 自 分 と 同じ 形 を し た 水色 
青 つ て 秘 動 する の 敵 が 攻め て 〈 る 。 こ いつ に ぶつ か ら 

見 た 感じ は な ん と な く 『 ロ ー ド ラン な いよ うに し な が ら 、 金 塊 を 29 個 以上 
ナー』 を 思わ せる 。 取っ て 右上 に 行く の が 目的 だ 。 

キミ の 動か す キ ャ ラク タ は 、 画 面 の 金塊 は 、 上 か ら 飛 びな り て 取る と 50 
左下 に いる 。 移動 キー は IRM な ん 点 。 ロ ー フ で 金塊 を あて る と 10 点 だ , 
だ けど 、 そ の まま で は 動け な い 。 説 明 下 に 表示 し て いる タイ ム が 0 に な る 
を ろく 〈 に 聞か ず に この ゲー ム を は ビ じ め か 、 水 色 の 敵 に ぶつ か る と MAN が 1 人 
て は 、 左 下 か ら 1 歩も 動け ず 、 や つ あ 減り 9、3 人 と も いな く な る と ゲー ム オ 
だ り し て 去っ て いっ た 、 無 理解 な スタ 2 
ッ フ も 多かっ た だ た 。 で も 、 よ く 聞 け ば か ロー プ を 縦横 に は り め で ぐら し て 金塊 
2 な 。 K を 取っ て いく な ん て 、 な か な か いい ア 
だ G 思 お な いう 


(人 NN 0 0 

「 さん な れ ワ 験 A く 用 き - あ 邊 

ンー 8 よ : い て | の て て 通ら 流 り m 
き う が の は イ 終 す 声 知 め だ 人 

な ん て 看 け 7 わ (を が て ろ が 

きら ば 〈 く | っ そ て あ まい う と 

| て で 還 。 07/ ト し まう ミ 引 

『 。 て 業 と 日 も た と あ ん 

W く 部 が そ に 試 N う き - 邊 

W だ の > A れ に と 編 l』 

| さ み G し 採 あ 集 』 

| 敵 < 部 『 

き が 

9 は ョ 』 

が lm 

ッッ ング " ん 8 

6 ソン ジョ 

' ノ ヤ 4 8 

4 上 か がら 敵 が 飛び ま AMy - 

お あり て きだ 。 まず ロー プ を 由 す | 

横 に は つて 逃げ 出 そ う 。 : 8 

Sa こ ここ 


# * 
工 ・ 


3 
yo 
ド . ぐ 3 


組 
紀 
織 
論 
絆 
論 
纏 
ド 
編 


A 下 で ウジ ウジ し て いる の ガ 敵 。 さ て 、 次 は どこ の 金塊 4 ふ ヒ ユ ュ ッ と 飛び お り る の は いい けれ ど 、 へ マ す る と か ん 
を 取 つ て いこ う ガ 。 だ ん に 敵 に つか まつ ちゃ う ぞ 。 


SS | 〈ROPE ROPE〉 ロー プ を は つて 宝 を いつ ば ぱ ば いと る ん だ けど 、 ロ ー プ が は つて ある と ころ し が 行け な い レ し 、 ロ ー プ が は つ 
て あつ て も 、 上 か ら 下 へ 、 い つき に 落ち て し まう か ら 注 意 。 


52 大 う 下 ょ 
S oN オー ソリ リー 
カシ オ の ゲー ム 電 卓 で これ に 似 た ゲ 
ー ム が あっ た けれ と ど 、 こ れ は 数 字 を 1 
つ ず っ 動か す の で は な く 、 1 列 ず つま 
と め て 動か し て な ら で か える パズル 。 
平面 版 ル シー ビッ クキ ュー ブ を 数 字 て 作 
みた だ で の と いう 感じ か な 。 


問題 は 1 一 7 の うち どれ か を 選ぶ シュ 


(3LIE 3 2) 


4 ま ざ は 問題 4 を セレ クト 。 


ム あ ちこ ちい じ く こつ て る うち に 何 が 何だ か 
わけ が わか が ら な くべ な つちや ゃ つた 。 


( 上 昌 朋 見 朋 8 8 8 8 上 8 胃 委 選 7】 


ツ ベ ュ ーー 
ボ ポシェ ッ 


ニー 
ト 常連 。 広島 の 先生 
ポシェ ッ ト に 採用 され る の は これ で 3 
回 目 。 し か も 私 の 誕生 日 に 通知 が きた 。 
全国 の お じ さ ん 、 お ば さん 、 ど ん どん 
投 稿 し て 、 マ イコ ン 誌 を 高齢 化 さ せよ う 。』 


時 計 2 放 8 2 BBM 8 8 コ 


車庫 人 れ > 


% 壮 FDR PASOPIA 7 


た お 


(《(( PSOPIR 7 ))) 
2774 4 


あつ と いう ま に も う 1 て 完成 だ 。 


錠 み 志 人 が っ て いで 、1 や 6 ま て は 29 
ター ン が 決ま っ て いる けれ ど 、 7 を 押 
せ は 毎回 違っ た 問題 が 楽し め る 。 

5 分 以内 に 解け な いと 自動 的 に ゲー 
ム オ ー バ ー に な り 、 リ ター ン ・ キ ー を 
押せ ば 再び 問題 選択 に も どる 。 

@ 操作 キー は 全部 で 

⑨ ] 12 個 ある ぞ 

数 字 を 動か す キ ー は 、[1-|9]EEH 
-] キ ー の 12 個 。 画面 を よく 〈 見 て くれ れれ 
ば わか る と 思う けど 、 縦 3 列 の 上 トト 、 


久子 な ら べ か え バ ズル 


4 も う 1 回 や のり 直し だ た ら 、 な ん と が ん だ ん 。 


文 リス ト っ 83 ペ ー ジ 


横 3 列 の 左右 に 、12 個 の キー が 表示 き 
れ て いる 。 こ れ が それ ぞ れ の 操作 キー 
の 説明 に な っ て いる わけ だ 。 
左上 の 大 き な 写 真 (問題 4) で 説明 
する と 、 こ の 画面 で [1| キ ー を 押せ ば 、 
3、2、1 が 1 段 下 に 下がる の だ 。 | 
キー な からみ 、5、 8 が 右 に ずる 6。 つ 
まり 、 問 題 の 枠外 に 表示 さる れ た キー を 
押す と 、 そ この 列 が 全体 で 1 マス 分 ず 
れ て 寄っ て くる こと に な る 。 
バズ ル 好 き の 作 者 
は 学校 の 先生 で す 

た だ し 、 初 期 画 面 で 数 字 の 入っ て い 
な いあ き ス ペー ス は 、 な か の ほう の 数 
字 と いっ し ょ に 、 縦 か 横 と どちら か に し 
か 動け な い 。 

どちら が と いう と 、 こ こ は 一 時 的 な 
待避 場所 だ と 考え れ ば いい 。 

を う 考 える と 、 こ の パズル は 車庫 入 
れ ッ パズル の 変型 の よう に も 見 えて 〈 く る 。 

それ に し て も 、 作 者 の 峠 (だ お 、 と 
読む ) 先生 。 ポ シェ ッ ト の Vol.2 で も 
152* ズ ル を 作っ て て れ だ ん だ けど 、 よ 
っ ぱ ぽ ど 数 字 パ ズル が 好き な ん だ な あ 。 
今度 は ぜひ 、 自 分 の 成績 の 伸び ( あ 
な い は タジン) が きれ れい が グラ ン イ ッ 
ク で 出 て きだ り 、 偏 差 値 を 計算 し た り 、 
成績 の 科目 間 バ ラン ス に つい て か ん た 
ん な アド バイ ス が 出 た りす る よう な お 
勉強 用 ソフ ト を 作っ て ほし いな 。 


2 〈③LIDE9〉 な ひな か の も の ネ 。 1 番外 側 の わこ 内 で は 動け な みい の で 、 そ こ を うま ぐ 利 用 し て や つて みよ つ 。 パズル の 中 で 
は 、 さ ん じゅ め う まる の 作品 か な 
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に 3 
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ol RW LN N 8 8 IM W W W WM W W 見 W 7 


_ 実 は 愛 機 を 手 ば な し 
か け て いた の か な ? 
、 ぼ て く は 写真 で は ニキ 
ビ が あり ませ ん が 、 本 
当 は ペン ネー ム の と お 
り 、 ニ キビ が ある の 
- で す 。NIKIBIKIN は 、 


ロー マ 字 を 逆さ に 読 2 
ん で も NIKIBIKIN で る 


_ す 。 あ と は 高校 入学 の と き に 豆 0A 
べ る よう 葛 強 する ふつ う の 中 3 で す 。ーー- 


PS. PV-2000 を 売ら な く て よかっ た ん 


MM MM MM MI IM BI IM MI 上 WM H 』 W 


キー ワー ド 在 読み 
取り 敵 を 撃墜 / 

ある 日 突然 、 怪 物体 が な り て きた 。 
ミサ イル も レー ザー も 、 超 核 ミ サイ ル 
も まだ くま か と さろ が 、 英 に 
は 、 1 つ 1 つ 盟 点 と な る キー ワー ド が 
あり 、 を その 文字 を ぶつ けら れる と 1 発 
定 4 朋 た で し まう りさ こよ と が わが か うつ 7。 
弱点 で て ある キー ワー ド を 探す た め 、 
P V 研 究 所 で は 特殊 スク リー ン を 開発 
し だ 。 向 が っ て 〈 る 敵 の キー ワー ド が 
沈 い ドッ ト て 少し ずつ っ 表示 きれ る と い 
リッ も の だ 。 し か し 、 念 いて 作っ だ た ため 
に お ね お で く 、 
部 表示 され る 
まで 待っ て い 
SODC (まま に 
あわ な い 。 

で 
大 あ だ り / 
確か 忌 *BPCL 
だ 。 こ れ で 1 機 
目 。 あ と 19 機 や 
つつ づつ け て ね 。 
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FOUR PV-e000 


和 ※ PDY Ar7k7 の 7 た 7 


ミ は 表示 途中 の キー ワ 
ー ド を カン で 読み と り 、 
ワー ドボン バー を 操作 
し て 敵 に 立ち むか っ た 
0 で の あう だ 。 だ だ も 、 
まち が っ た 文字 を 発射 
する と 、 敵 の スピ ー ド 
が 少し 速く な る の て で 注 
意 ./ 侵入 を 許し た ら 
キミ が や られ て し まう 。 


強 蔽 を ワー ドボン バー で 迎え 撃て / 


文 リ スト っ 84 ペ ー ジ 


Su ょ まま 
電 。 dl 


s 


文字 に カー ソル を 
あわ せ て 撃て / 
ワー ドボン バー の 操作 は か ん た だ ん 。 
スク リー ン に 徐々 に 現れ る 文字 が わか 
っ だ ら 、 そ の 右 に ある ワー ドウ ィ ン ド 
内 の カー ソル を 目 あ て の 文字 に あわ せ 、 
ATTACK(0 ) ボタ ン を 押す 。 す る と 、 
右 下 の ワー ドボン バー か ら 文 字 が 発射 
され る 。 20 機 や っ つけ る と 、 上 か ら U 
FO が お り て き て ボー ナス を くれ る ぞ 。 


和 い ワ / レオ 了 
ン ビ ュ ン 飛ん で いっ ちゃ う の 
だ 。 ゲ ー ム が は じ ま っ た ら 、 
使う ボタ ン は 、 同 ボタン ( 噴 
射 ) と 十字 ステ ッ ィ ク ( 庄 有 ) 
だ 。 還 ボタ ン を 押し だ た だり は な し た り し 
て 、 高 さき と ス ピー ド を 調節 し な が ら 、 


マリ オ が フワ フワ 雷 を 著 ぶ 


Js 十字 ステ イッ ク て 左右 に 移動 し ょ 5 
AE o 
2 ミリ ー で ーー 

8 FDR ファ ミソ リス ト っ 87 ペ ー ジ お っ と 、 ス ティ ッ ク を 左 に 押せ ば マリ 
ョ ンピュータ し 1 オォ は 右 に 、 右 に 押せ ば マリ オ は 左 に 飛 
交 乏 NS-HUBASIC | 」 CC いく が りら 注 。 つ 


まり 、 ス ティ イ ッ ク は 噴 
射 の 方 向 ア コン トロ ー 
ル し て る 感じ な の だ 。 
マリ オ が 飛び すぎ て 
画面 を は み 出 ちゃ うと 、 
下 に 座標 が 表示 され る 。 
で も あん まり 飛び 出し 
すぎ る と アウ ト に な っ 
生ま プ の て 福間 。 


4 ム フ ワ ッ と 宙 を 飛ぶ マリ オ の カブ セル 。 操 
作 は めちゃ ムズ いそ ぞ 。 


遊び 人 マ ] て し の ここ て いら ど ~ レ 
リオ の r 1 ンチ ば の 
宇宙 遊泳 

フワ ーッ と 浮か びあ が 還 

る カプ セル に は 、 あ の マ 
リオ が 乗り こん で いる 。 
22 ド or の で て ルオ 
操作 し て 、 し ば し の 宇宙 遊泳 を 楽し ん 
で 、 着 陸 台 に うま く 降 り れ ば 成功 。 こ 
の 遊び は "ナイト ラン デメ ォ ィング ” と い ゆい 
うん だ そう だ 。 ち な み に 、 タ イト ル の 
『PLAY BOY』」 と は 、 遊 び 人 マリ オ 


の こと な ん だ っ て 。 ヽ m か 


デー て も 

ms プア ミコ ン ケ 8 

ー ム に つい て - 

ファ ミリ ー コ ン = 

「 ピュータ で ゲー ム 8 

を 作る と き は MO ま 

WVE や PALET を 活 和 

』 用 する こと が だ い - ュ コントロー ラー の 因 ボ タン また は 還 
『 に で すれ まだ mo ボタ ン を 押せ ば 、 ゲ ー ム スタ ー ト 。 回 
W プラ イト キャ ラク の 0 ロ ル 

E タ は 組み か えて 、 ち ょ っ と し た オリ ジ ナ - は アマ チュ ア 用 、 国 は プロ 用 。 最初 は 
ルル も で きま す 。 今度 、 フ ァ ミ リーBASIC ョ アマ 用 で や っ た ほう が いい よ 。 ブ フロ 用 
W -G と いう 期待 ソフ ト が 出る らし い の で 、 が コジ 償 天 ラー 上 提 い た よき の 
還 みん な て 買っ て MSX を た た こ う / B 0 NPG 
SS ここ ここ 反応 が すご く PA 4 SN 0 リ 寺 が ビュ / 


PLAY BOY〉 ファ ミコ ン の ゲー ム だ ね 。 右 と 左 が 逆 だ つ だ の で ジ ヨ イ ステ ィ ッ ツク も 逆 こ し て や つ だ けど 、 ち よ つ と 押す 


だ け で 、 あ れ ぇ つて な 感じ で 、 ど こ ガ 見 えな いと ころ で 死ん いで る ん だ よね 。 ま ず は 空 に 浮く こと を 練習 し よ つ つ こ 。 タ Z 


ヶ と /000g ハ g@ 


ココ 
2 


送 み ー ヒ コン ヒー// 


ー ソ に ご っ た PB ボク シン ク 


88 FDR PB-100/110+ 
DR- 1・PB フ ァ ミリ ー 


半 誰 PY 炎 商 必 


汁 ま で 表示 され る 
疑 つ を ボク シン グ 
の この だ た ポスト サ ン ォ ( ) は か ん 

/ 科 ( Go7c6。 まぶし い 定 / な 

の は 6 ぴく で き て る ね ー グ ちろ で 

感じ で 、 た けち ゃ ん の 周辺 で は 評判 に 

4002 

416| キ ー で キミ の ボク サー(Q ) を 左 

右 に 動か し て の ボク シン グ 。 相手 は な 

た 2 で 9 とう の の だ 。 
パン チ は 2 種類 。 [7| キ ー が スト レー 
ト 、 [9| キ ー が スイ ング (上 か ら 打 ち ゎ 

ろ す 打 法 )) スト レー ト は 、 敵 と の あい 

だ が 2 コマ は な れ て いる と 有効 、 ス イ 

ング は 洋 と の あい だ が 1 ユマ は な れ て 

いる と き に 有効 だ 。 

も ちろ ん 、 敵 も 攻撃 し て 〈 る 。 敵 の 
パン チ 6 2 種類 あっ て 、 あ い だ が 2 コ 
マ は な れ て いる と き は スト レー ト 、1 
コツ の と き ほ アッ パー を る て くる 。 

1 試合 5 ラウ ンド 制 。 KO 勝ち ゎ 判 
定 勝ち ちあ る 。 あ 、 そ うそ う 、1 試合 
に つき 7 回 (相手 に 数 回 パン チ を あて 
る と 5 回 の み 使え る )、|5| キ ー で ガー ド 
も で きる の だ 。 た だ し 体力 が な いと 使 
えな く な る ぞ 。 体力 が な く な る と ダウ 
ジ 10 つつ @ づ ん と 変わ る ) し て 、 セ ラッ 
ェ リ ー ( 更 ) が カウ ント を 取り は じ め 


ーーーー ニ ーー ツ 
で も 、PB も 見 捨て な いよ うに 』 
_ は じ め ま し て 、 林 貴弘 で す 。 現在 

_ の 2 年 生 を や っ て お る と ころ で す 。 

_ 話 は 変わ る けど 、 今 、 パン 

コン を 買お うと 計画 

し と り ま す 。 は じ め 

の うち は 、 手軽 さ の 

_ MSX を 買お うと 心 に 
決め て いた ん だ けど 、 
MZ-1500 に し よう と 

か PC-8801mkH が いい 

な と 思っ た りす る 優 

不断 な 私 で す 。 
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る 。 相 手 に も ダメ ー ジ を 与え て いれ ば 
[8| キ ー で 起き あがれ る ぞ 。 カ ウン ト ギ 
リ ギ リ ま で 人 待っ て 体力 を 増やそ を う 。 を 
れ か ら 敵 の アッ パー は 強力 だ どか ら 注 意 。 


< 基 


相手 は ダウ ン (つつ ん /) する と 
も う 起 き あ が れ な い 。 キ ミ の 勝ち だ / 


上 FDR PB-100/]10+ 
氏 DR-1・PB フ ァ ミ リー 


角 PY あみ /g/: ア / 
巨神 兵 の 炎 か ら オ 
ー ハ の 子 を 救え / 


ささ は ナウ ルカ 。 の 
ンシップ (ご ) て 飛行 
中 、 オ ー ム の 子 (m) 
が 互 神 兵 (@) の 火炎 
(一 ) に さら され て い 
る の を 発見 。 る っ そく 
助け 出し て 、 条 の ほう 
Gf) へ 避難 する こと 
に ん だ 。 ーー ム の ずる 
連れ て いく に は 、 ワ イ 
ーッ し ーー) る はら 
だ く で は いけ が だい が 、 
グ の ペグ クズ スト て いる と す 
ぐに 切 析 て し まう の て 
すばやく 行動 し ょ よう / 
神 兵 の 火炎 が オー ム 
の 子 に あだると マイ ナ 
ポス ンド 、 サザ ツン シ 
みあ だ る と マイ オイ ザ % 
0、5 ポ オン ト 。 マ イナ ス 


| 固 昌 胃 朋 胃 計 計上 胃 四 胃 半 閉 開 】 


いま す 。 


トー 


ォ ー ム の 子 を 救い 出 
9 の を 
の 子 の 数 も 、 それ に つれ て 2 、 
ぇ る の て 難し く な る ぞ 。 
< の 輝 アマ レベ ル で は 、 
アン 話し あい も で きる 

ナウ シカ は [1|、 [3 キー で 左右 移動 。 
ワイ ギー ヤオ ー ム な の 子 に つなげる に は 、 
1 コマ 分 の 間 了 過 を あけ て [キー で O K。 
7 も 。 の ボン (の) が プリ 9 
回 、 ア マ な ら 5 回 点 減 す る と ポッ ン と 
切れ て し まう の で 、 必 死に [3 キー を 押 
し じ し ィ か まけ な さも 

虹 人 に ブロ ( 思 ) り か アマ (4) が か レ 
ベル の 選択 を し て 、 ゲ ー ム スタ ー ト 。 


ステ デー ツジ が 妥 や あり ひ 。 オーム 
3 と 増 


オー ム の 子 を 巨神 舌 の 火 交 か ら 守 れ 


デモ 入れ て いい 
いん で ナウ シカ ? 


ン に こっ て いる も の が 
4 ポイ ント に な る し と 、 』 少な いか ら で す 。 ぼ く は ステ ッ プ が あま 
電 思い っ きり デモ に こる こと に 


ト 用 朋 HB 8 BI 8 8 BB M 8 8 8M 


s 旧 販 
し か 届か な いけ れ ど 、 も し 、 
火炎 を よ け き れ な いと き は 
凶 キ ー で バリ ア を は る こと 
が で きる の て 利用 し ょ う 。 
アマ で は 、 巨 神 兵 の す で 了 閥 9 
まで 行っ て 了 名 キー を 押せ ば 、30 


京 と 引き か え に 10 回 火 突 も ストップ し 
て も らち える よ 。 も な か み に ス テー ジ が あ 
が っ て も 救出 する の は 1 匹 び だ び け で OK。 
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1 


実は 自信 な 
か っ た ん で す 
の それ で も 
投稿 し た の は 
P B の ブロ グ 
ラム で デモ ン 
スト レー ショ 


朋 放 放 衣 朋 計 朋 且  M ま 計 昌 | 


も し 。 ナ ウシ カ 
が 株 に 入っ た 直後 に ワイ ヤー が 切れ る 
と 株 が か がら トコ マ は が 杭 だ と ころ に オ 
ー ム の 子 が 残っ て し まい 、 も 2 う 2 度 と 
救出 で き な く な る の て 注意 。 

オォ オーム の 子 を 森 の すぐ 隣り まで 連れ 
DE 、 NL に 尼 が ある 。 

下 神 兵 の 火炎 は だ か ら 7 コマ 日 まで っ 面 、3 面 で は こん な ふう に な ら べ て フク 
| リリ ア す る と 高 得点 


江 テ っ 
表 個 ! あ 


< 福岡 ・ 渡 辺 一 安 > ポ ボ シ エ ッ ツ ト 裏 面 場 を 読者 に 解放 し ろ ! 
か ら そ れ だ け は ご か ん ベ べ ん ! 交 ) 


要求 が 通る まで ポ シ エ ッ ト 買 つて や らん ぞ ! ( 立 ひ えー、 要 求 の む の 


と gg@ 


fa 
ご ィング 


※ー/ 


2 の 


FOR PB-100/110+ 
線 DR-1・PB フ ァ ミ リー 


た //// 


< ペ シヤ ル フラ 
ッ ツ グ を 目指 せ / 

DP NASU0 EURON ま 0 % 
100 コ マ の 大 き な エ リア を 車 が 走り まわ 
る 、 ポ ケ コ ン ・ ス クロ ー ル ゲー ム な の 
0 

だ ただ し 、 も ちろ ん 、 キ ミ が 1 回 で 見 
られ る の は |“ 」” で 囲ま れ た スク 
リー ン シ の 部 分 だ け 。 ス クリ ー ン に 現れ 
る 、 で が キミ の 車 だ 。 
214I6I8| キ ー で キミ の 車 を 上 下 左 右 
に 走ら せよ う 。 有 目的 は 、 エ リア の どこ 

こ あ る sP (スペ シャ ル ・ フ ラッ ク ) 
2 胞 の こと だ 。 そん が こと いつ て も 。 
と っ ち に 向かっ て 走っ て いい の か わか 
ら な い 、 と いう キミ 。 画面 の 右 は じ に 
表示 され て いる 矢印 が 、 だ いだい の 方 
向 を 教え て くれ る 。 欠 印 を 頼り に 進ん 
で いけ ば 、 突 然 、 盆 昨 の スペ シャ ル ・ 
フラ ッ グ が 画面 に } Ma MO の 490 7 る 
だ だ し 、 道 路 の “・” は 障害 物 だ か 
ら 、 ま と も に ぶつ か る と 爆発 する ぞ 。 
も う ひ と つの 重大 な ジャマ 者 は 、 最 
初 、 キ ミ の 車 の 10 コ ユマ ほど 下 に いる 敵 


ト NM B 見 計 選 見 皮 朋 見 見 記 四 朋 区 委 ほ 


_ 最 近 、 ぼ く た ち の と ころ で ポケ コ 
ン が は や り 、 ア ド ベ ンチ ャ ー が と て BB 
も 流行 し まし た 。 そ し て 名 作 ( 7?) が の 
数 多く 作り 出さ れ ま し た 。 次 回 は 、 
これ を 送っ て みた い 
と 思い ます 。 


| っ 


- まま 民 ほ ー ュ 中 Y メー 葵 


ズ ペ ンジ シャル フラック 求め て 東 へ 西 へ 
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の 車 ( 移 ) だ 。 こ いつ は 、 確 実に キミ の 
車 日 指し て 追っ か け て くる し 、 を の う 
ぇ 、 障 害 物 も 平気 で 乗り 越え を て くる の 
だ 。 そこで 、 キ ミ は [5 キー を 押し て み 


ょ う 。 ス モッ グ (@) が 飛び 出し て 、 


時 的 に 敵 の 車 を 足止め で きる 。 た だ し 、 


1 加 し か 出 な い 。 

それ か ら 画 面 の "DEGTRND 人 “GR 
A" の 表示 に 注目 ここ は 、 エネ ルギー 
2 時 を 表し で いで DERG に か っ で し 
ば らく し て も フラ ッ グ が 取れ な いと 、 
1 吾 欠 な っ て し まう ぞ 。 

英 の 車 を も スモッグ で 足止め みす る た び 
に 200 点 。 ク リア する と 500 点 だ 
エネ ルキ ギー の 残 量 に 応じ て の ボー ナ 


タン ンタ ンタ ン 3 


スモ ッ グ 攻撃 だ 。 


人 ムズ ス い / 


4 見 つけ / 


スペ シャ ルフ ラッ プ は 下 の ほう に ある 、 と 仙 の 拓 印 ガ 


いつ を 必 つ て と す ステ ー シ ジグ リク だ 。 


ス も ある 。 2 面 ご と に へ ビビ が 
出 て き て 5000 点 / 

@ な ぞ の カブ キ お 
@ じ さ ん も 出る ぞ 
と き と どき 、 巨大 フ ラッ グ (SP) に 出 

くわ し て 、 こ れ は な ん と 2 万 点 の ボー 

央 に な がかる 。 
さす が 、 巨大 な だ け あ る 。 

と の つの 、 久 そ ん が ホー ミン グ 


な の か 諸説 分 か れる と ころ な ん だ けど 、 

"カブ キ お じ さ ん” と いう 変 チ クリ ン 
な キャ ラク タ も 出 て 〈, る 。 
ルル と だ の 7 よく で する と 。 
3 


この お じ る 
1 力点 も ら え る 


吉 つ て る 。 


テッ 
家人 右 ! あ 


れ て いる プロ グラ ム 専 門 誌 だ か ら で す ! 


< 北海 道 ・ 種 な し スイ カ > ベ ペー マガ は 本 屋 に いつ ぱい 置い て ある の に ポ シ エ ツ ッ ト は ら 虹 くら いし か な いけ ど 、 ど ー し て (な そ 
れ は 、 ボ シ エ ッ ト が 、 ベ ー マ ガ の 次 に 売 


トッ プ へ の 道 は け わ し い ! ) 


プロ 77 ム 


レベ ル の 選べ る 】 人 用 テー 


紅 FOR PB-100/110+ 
SN DH-1・ PB ファミ リー 


pp ルン だ 


2 技 イ ター 


4 ム 敵 の サー ブ 。 コ ー ス は ど ごま ん な が だ 。 


を 


移 
の 多 


まや つた 。 . り ーー/ バ ユー ス た 


みち ゃ ん ) で 、 レ ベル 4 が 世界 の マ 
ッ ケ ン ロ ー” 級 だ 。 ち な み に 、 
2 は “ヒラ の テニ スク 部員” 級 て 、 レ ベ 
ル 3 が “を その キャ プ ブテン” 級 と で も し 
正二 きま も よう の か 。 

レベ ル を 入力 し た ら 、 ま す 代 手 か ら 
の サー ブ で ある こと を 表 が が し て 、Rea 
dy 27( 用 意 は いい か い ) と 聞い て いる 。 
何 が キー を 押せ ば 、 コ ユー ト が 出 て き て 、 
ボー ル が 飛ん で くる ぞ 。 キ ミ は "和合 「、 
相手 は “ 現 "だ 。 

飛ん で くる ボー ル に は 、 上 、 中 、 ト 
の 3 つの コー ス が ある 。 これ を 返球 す 
る に は 、 ユ ー ス に あっ た だ キー を 押さ な 
ん も ちや いない 。 上 の コー ス の が 8、 中 
の コー スズ が 2 、 下 の ヨ ー ス が 1 だ 。。 


レベ バベル 


レベ ルス に は まず ざ 
勝て な いそ うだ 
シベ ル 1 か ら レ ベル 4 まで 、 相 手 の 
3 な ポ グ が コツ ド ケ ニス 。 し ペル 1 が 
隣り の な ね ぇ さん ” 級 (例え ば 、 ゆ 


本 ジッ ビ 
CM 


いう 会 社 じ ゃ | ( 広 そ の か わり 、 真 夜中 まで 仕事 し て ます つ ! 
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と 『 5 H IM IM  W 8M 8 W 8 W W 8 B W 7 


IO き 
lm て て ル し る 』 
m た か ぶ た の は | 
(の らち ら ル - い 途 あ き 
まで 上 | 1 中 る 肖 
W す に チ - 晴 1 
W トー と 急 れ 8 
1 た に 邊 
と 完 5m 
| フラ 大 た ド F 月 ョ 
『 し っ B の 和 
W 2 た や て こ 』 
絆 お た な まで 
W。 が す や ルレ し 8 
し 信徒 : を た 8 
W 長 そ ボ 和 飛 
5 。 し し | ば あ 引 
エエ ここ ここ ここ ここ ここ 4 


相手 が 打っ て いる と き に 、 [4| キ ー を 
押す と 2 コマ な に 移動 し 、|6' キ ー を 提 
す と 2 コマ 右 に 移動 で き る 。 1|、 [3] キ 
ー な ら そ れ ぞ れ 1 コマ ずつ の 移動 だ 。 
勝敗 が 決ま っ た と き に ネッ ト に 近づい 
て いる ほど 点 が 高く な る 。 

相手 の コー ト に 打ち こむ と ACE"、 
自分 が ミス する と MISS” の 表示 。 4 
打 先 取 で 1 ゲー ム 勝 ち に な り 、 3 ゲー 
ム 先 に 勝っ た ほう が 勝者 に な る (ふつ 
う の グ ラス と 0 じ W 一 みみ) だ お だ し 、 9 
ゲー ム ま て 勝負 が つか な いと き は 10 ゲ 
ー ム 日 で ゲー ム オ ー バ ー に な る 。 
サー ブ プ 権 は 1 ゲー ム ご と に 、 ち ゃ ん 
と 入れ か わる 。 自分 に サー プ 権 が ある 
と き は 敵 の 動き が 少し に ぶ く な る ぞ 。 


< 東京 ・ 川 越 章 二 > こ の まえ 、 お 昼 ご ろ 電 話 ひ けけ た ら 、 ポ シ エ ッ ト の 人 は だ れ も い な こぐ て 、 や つと 方 の / 時 に お 話し だ 。 ど つう 
で も 、 夜 中 に 電話 を ガ けけ る の は や め て ね 立 ) 


ウ / 


EZ オニ た ん 川 川上 


2 
er 
ee 


空 一 // 


6 う パワ ー ボ ー ル を 求 
人 め る 戦士 の 物語 

「' む か し むか し 、 あ る と ころ に レー フ 
と いう 必 の あり まし だ た 。 そ こ ヘ ライ ルル 
いう 国 が 攻め て き て 、 国 王 も 王妃 も た 
お れ 、 ぴ の と より で て が ん ば っ て いた だ リア 手 
女 も 傷つい に て し まい まし た 。 を そこ で 国 
いち ば ん の 戦士 エ ュ が 伝説 の パワ ー ボ 
ー ル ーー アド” を 探し に 、 国 中 を 探し ま 
ね つろ が と ころ 、 思 っ と アド ミッ ド 了 7 
と いう と ころ に アデ トド が ある の を 見 つけ 
だ の て す 。、 も か し 、 アデ トド ト は 作 し い ド トラ 
ゴン に 守れ て いた の で し た …… 」 

と いう と ころ で て 、 ア デア ド を 求め で 、 
ー ル ファ レイ ング ・ ゲ ー ム な の だ 。 メ モ 
リ や ギリ ギリ に 使っ た 本 格 司 険 ゲ ー ム 。 
( 生 ・ 計 算 容 量 オ ー バ ー で エラ ー ガ が 出 
た ら LD EF| 思 で 再開 で き る 。 うー も 、 
これ は がかり ばい だ し か だ な か ない の じゃ ) 


FOUR PC-]500 二 4KRAM/ 
SS | 
0 pY 。 庫 力 溢 忌 


き な の だ 


ノー マル モー ド 画 面 の いち ば ん 左側 
に ある の が 、 戦 士 エ マ の 目 に 見 ぇ る 風 
京 だ 。 下 の キ ャ ラク タ 紹 介 の 最後 の ほ 
う が 、 こ こ に うつ る 風景 の 説明 に な っ 
て いる 。 つ まり 、 こ の 部 分 は 3 D 迷 路 
に な っ て いる わけ だ 。 ノ ー マ ル モー ド 
で は 、 こ の 画面 を 見 な が ら 、 ア ドミ ッ 
ド 城 の な か を 、 き ま よ い 歩 く こ と に な 
る 。 1、 [3| キ ー が 、 そ れ ぞ れ 左 を 向く 、 
右 を 向く 《 (前 進 は し な い )、 を し て 、 [| 
キー を 押せ ば その 方 向 へ 前 進 す る 。 
画面 の 石 側 に は 今 の 自分 の 状態 が 、 
シン ボル と 数 字 で 表 る れ て いる 。 
まだ 6 し な いで て くれ 。 衣 っ で 多き 
た いこ と が 山 ほ ど あ る の だ 。 

[| キー を 押す と"Magic item / が 出 
を 人 。 さと し は 、。 そ で それ まで に 手 に 入 
マジ ジック グ クア デイ チム が シン ボル で 
( 下 の 給 介 参照 ) 表示 され る こと に な 
る 。 ふ だ ん 出 て くる キャ ラク タ と 同じ 
な の で 注意 。 次 に IENTER| を 押す と 、 
結 馬 度 (H・P) 、 体 力 、 最 高 体 力 が 示さ れ 、 
も うい ち ど 押 す と 持ち 物 の シン ボル と 


プ ド を 求め る 戦士 マ の 物語 
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その 数 が 示さ れる ぞ 。 和 殺傷 力 ( 剣 ) を 
持っ て いな いと 、 敵 と 戦え な い の で 、 
は じ め は ます 殺傷 力 を 買っ て な いた は ほ 
うがい い 。 

座標 が (0.0) の と き に 、 [6| キ ー を 押す 
と 、 売 店 に 入れ る 。 こ こ で は 、 物 を 買 
っ た り 、 逆 に 売っ た り で きる の だ 。 

は じ め に 出 て くる 4 画面 で 物 を 買い 、 
次 の 4 画面 で 、 売 る こと に な る (それ 
れ 個 数 を 入力 する )。 

シン ボル と その 1 個 あ た り の 値段 を 
GOLD で 表示 する が 、 殺傷 力 と 装甲 度 
(防御 力 。 計 が シン ボル ) を 買う と き 
の や り 方 は 、 右 ペー ジ 写 真 の 2 番目 を 


DD MID キャ ラク 紹介 


一 騎士 一 人 ー 左 側壁 な し 


(殺傷 カ ) 


き 、 "ブーツ uppDGG ー 前 方 壁 あり 


名 ロロ D わ 


ー 抗 一 前 方 般 な し 


に 軸 べ で Wz 人 る 


ーー バー バリ アン B 


8 右側 壁 あり 


、 識 諸 - ょ 


側 あ り | ー ー 1 一 有 側 壁 な し ( 


農民 つて 強い ひけ ら キラ イ / で も 、 ご こつ ち が 戦 


見 で くれ 。 

と ころ で 、 楽 は ノー マル モー ド の と 
き [4| キ ー で 飲む こと が が で き 、 力 が 
C 、 食 べ 物 は (0, 0) 以外 で [6| キ ー を 押 
せ は ば 食べ られ 、 体 力 が 8 増え る 。 

を それから |7| キ ー を 押せ ば H・P (経験 
忘 ) か ら 19| か れる か わり に 体力 を 50 
増やす 魔法 が 使え る 。 

最後 の 面 で ドラ ゴ 
ン を や つつ づつ づけ よう つ 

さあ 出発 。 迷路 を 通っ て (9, 7) の 
ドア を 目指 た とう 。 こ こま で て くれ ば 上 の 
階 の (0, 0) に 行け る の だ (アド ミッ ド 
城 は 5 階 建 て な の だ )。 途中 で 敵 に 会 う 
と 、 フ ァ イ ト モー ド に な る (写真 参照)。 
ある 種 の 敵 を 倒す と な に か の マジ ッ ク 


ンク 
ンジ 多 2 2 


アイ テム が 手 に 入る 。H・P を 20 ま で 増 
や し 、 マ ジッ クア イ テ ム が 4 つ 全 部 手 
に 入っ だ と き 、 は じ め て 4 階 か ら 6 5 階 
へ 行け る の だ 。 を そこ で は ドラ ゴン が キ 
ミ を 待っ て いる 。 

ドラ コウツウ と 戦う よ とき は 、 急 に リア テル 
イオ イ ムッ グー ム に だ る そ 。 

[113I で 前 ・ 後 進 し な が ら 、 |5| キ ー で 
攻撃 。 た だ し 、 背 後 か ら ド ラゴン の 秋 
を あび る と キミ の 負け 。 ア ー メ ン 。 

あと は 自分 て 見 つけ て いて こう 。 

最後 に ノー マル モー ド で の キー 説明 

を まとめ よう 。 1ー|3 ト 迷路 を 進む 
|4|…・ 楽 を 飲む ノ 15|… レ ポー トノ [6|… 買 
物 ま た は 食事 ノ 17|… 魔 法 /I8…SAV 
E (自分 の デー タ を 残し て お ける )。 


シェン 』 


TI 5 5 E E W 5 3 3 8 8 W IN E W 『 5 ) 


4 人 NN 0 01't 
いろ いろ ある けど 字数 が ね え 
まき ども 、 お ひさ し ぶり で す 。 

科 。 少し 長い の で す が 、 が ん ば っ て 入れ て 
くだ さい 。 実は あと 3 日 早く で き あ が っ 
m て いれ ば 、 第 5 号 に ま に あ っ た の に 。 


WW あと 、 こ れ の 8 K 用 を 考え て いる と か 、 
1 PC-1350 を 買っ た と か モモ の ビデ オ を ダ 


m ビン グ さ せ て ほし いと か いろ いろ ……-。 


1 1 Ge ie iu in ig nm li ii iii en en it it ii ii inn em mm mm mi ゆみ 


1 HI I 8 HI HI I 1 1 IA II I Il 1 1 ノコ 


ム 売 店 。 こ れ は 殺生 力 ( 侯 ) の 買い 物 。30 灯 傷 力 が 金 8、60 殺 傷 力 が 金 16、90 条 傷 力 が 金 24。 和紀 キー で 、3 つ の うち 1 つ を 選択 し よう 。 


SS 穫 箇 
S 半 


4 ファ イト モー ド に な る と 、 戦 つか 逃 げ る ガ き いて ぐる 。 戦 うな ら 」ENTER 、 逃 げ る な ら 11 


WP 


NN 
SNNNNNN 
NN ベ ベ NN SS 


ぶ 


は 逃げ た い 気 分 な の で 、11] を 押し た ら …。 


4 だ め だ つ て 。 逃げ る こと も 許し て ぐれ な い 。 


さぶ 


も の 


4 は お お お つ 。 ど ん どん 体力 が 減 つ て いく 。 や ば いな あ 、 武 器 を も つと 買 つ て りや よ か が つ だ 。 


一 度 あ いつ と 戦わ な くち ゃ いけ な い 。 グ スン グ ス ン 。 


4 最後 の 1 シー ン 。 エ マ 対 ドラ ゴン 。 こ こ で 勝て ば 、 キ ミ は 勝利 の 騎士 だ 。 


< 大 阪 ・ サ ワ > ポ シ エ ッ ツ ト に 投稿 し た を いん で すけ ど 、 し めき り は いつ まで で すか ( 災 切り は 特に 決め て な い の 。 い つ で も ど 
う ぞ 。 と きど き 、 古い 選 間 作 品 を も うい ち ど 見 直し て 、 敗 者 復活 | つて こと も あり ます 立 ) 


レル / 


0097-Og@ 川 


私 が 千葉 県 立木 更 津 
黄 枝 の 秋元 生 弘 で す 。 
縁 を 切れ そう て 大 変 


イク 漫画 、 特に 「『X 

リカ ン ロ ー ド 』 が 好き な ん ーー 

で すけ と 知っ て ます か 。 ち ょ っ と マイ ナ 
2 の 2 ーー ソリ 

トン ネル の な か は ne ll 

カン で 勝負 / 

は じ め て の ゲー ム ス タ ー ト の し とき は 
[DEFlI。 リプ レイ する と き は 、[DEFI 
で スタ ー ト が だ 。 

オープン コー ス や 周回 コース ( 要 す 
る に グル ッ と まわ っ て も と に も どる サ 
ー キ ッ ト ) が 選べ る 、 レ ー シ ン グ ゲ ー 
AM は まじ まる で 。 

まず 、 最 初 に "CLOSED 7? "と きい 
て 〈 る 。 周回 コース な ら 1 、 オ ー プ ン 
コー ス な ら を それ 以外 の 数 字 を 入力 し よ 
2。 に SOUNDY も きい て くる の 
で 、BEEP 音 を 出す と き は 1 を 入力 。 
いら な いと き は 別 の キー。 最 後に "DE 
MO 7?“ と きい て 〈 る の で 、 ユ ー ス の デ 
モ を 見 だ た いと き は 1 を 押 そ う 。 始ま っ 
だ た デモ を スト ッ プ する に は キー だ 。 

グリ スマ ス ャ ツリ サー の 6 の 0 ザイ シ と 
も 0 の ーー の ド 。 スチ テリ シング 

( 充 有 移動 ) は だ が ガ が 0| (2 コマ 分 ) と 
に 上 マリ 用 が (2 マ リ と MM 
コマ ) コー ナー で は 遠 選 力 で 車 が 外側 
に 流れ 、 カ ー ブ の 程度 に は 3 段階 ある 。 

た ま に 、 ト ン ネ ル に 入る こと が ある 。 人 4 お お つ 、 こ れ は か な りき つい カー プ だ 。 キー を ビシ ビシ だ だ け 。 


FUR PC-1951/18 


pY 。 式 写 聞 必 


し 作 妥 昌  ー< 


4A ん 、 ち よ つ と 右 に カー ブレ し は じ め だ な お 。 


画 画 が 時 に な り 、 道 が わか ら な く な っ 
て し まう の で 、 曰 抜き の 車 が 左右 に ブ 
レ は じ め だ た だら コー ナー だ と 判断 し よさ う 5。 
20 キ ロ 以 上 走る と 速く な る ぞ 。 


4 トンネル に 入 つ だ ら 、 こ うな る / な ん に も わか が り ま ヘー ん 。 


お な じみ の 読者 は ちょ っ 

と 面 く ら っ た か な 。 ペ ー ジ を 切り 取っ て 打 

ちこ ん だ り 、 リ スト だ け 保 存 し た り で きる よう に 、 リ ス 

ト と ゲー ム の 説明 を 大 胆 に 分 け て み ま し た 。100 ペ ー ジ に 

この 方 式 に つい て の アン ケー ト が ある の で 、 そ ちら も 見 
て ね 。 

この ペー ジャ て 掲載 し て いる リス ト は 26 ペ ー ジ か ら 54 ペ 


ー ジ て で て 紹介 し た ゲー ム の プロ 
クラ ム で す 。 フ リン タ て 打ち 出し た りえ スト を 福 
小 し て 掲載 し て いる た め 、 十 分 注意 し て いま す が 印 刷 の 
関係 て 万 一 見 えな いと ころ が あり まし た ら 、(03)29 テ 46 
10 テ クノ ポリ ス 編 集 室 ポシェット 担当 者 まで お 問合せ 〈 
だ さい 。 調査 し て お 答え し ます 。 ま た 電話 は な る べく 平 
日 の 夕方 6 時 て 8 時 に お 願い し ます 。 エ ラー な ど は 打ち 
こみ ミス で な いか どう か を 確認 し て か ら 電 話し て ね / 


19 WIDTH 89,.25:CONSOLE ,,9,1:DIM A(53),P 
(4.13),M$ も (4) ,C$(13) ,T$(4) ,PA(4) ,M(4) 

29 DEF FNA(X,Y)=P(X,Y)-1INT(P(X,Y)/1099)x1 
99:DEF FNB(X.Y)=(X-1)x13+Y 

39 REM ----- カー ト ~ ノ ヨウ イ --ー ニ ーー 

49 FOR !I=1 TO 4:M(I)=13:FOR J=1 TO 13:L し = 
L+1:A(L)=IX199+J:NEXT 了 J,1 

9 REM ニー ニー ニー ツヤ ツノ 上 ニー ビーm 

69 FOR 1=1 TO 59:A=INT(RND( 1 )x52)+1:B=IN 
T(RND( 1 )*52)+1:C=A(A) 

79 A(A)=A(B):A(B)=C:NEXT 1I 

な 具 REM ニニ ニニ ニー ガ カート” チー グ が 上 上 テア ーー ュー 

39 FOR !=1 TO 52:J=J+1:P((1 MOD 4)+1 ,(J 

MOD 13)+1)=A(I):NEXT | 

199 FOR !I=1 TO 52:A(I)=9:NEXT I:FOR =1 

TO 4:A(FNB(I,7))=1:NEXT 1 


RBEM) ニニ ミニ ガク ジル 、 アー ョ ツ 当 SN り さ ニ ここ 
1 2 DATA 全 9 る. あま 、A」 2.3.4.5.6,.7.8.9。19,J,。 
と ーッ 1 | 1 , ーー ンプ 


139 FOR I=1 TO 4:READ M$(I):NEXT I 

149 FOR !=1 TO 13:READ C$(1I):NEXT 

159 FOR !I=ji TO 4:READ T$(I):NEXT 1 

169 REM ----- ツキ カン ュー ニテ 

179 PRINT CHR$(12):COLOR 7:LOCATE 9,18:P 

RINT STRING$(89 ,"ー" ): 

189 LOCATE 9,1:PRINT STRING$( 89 ,"ー" ) ・ 
199 COLOR 5:LINE (9.29)-(69,29) ,、"",5:FOR 
1l=9 TO 12:LOCATE Ix5.29:PRINT 1+1: :NEXT 


299 COLOR 6:LOCATE 9@,19:PRINT "アナ タ ノ テ フ タ 
5 の 

219 COLOR 5:FOR 1=1 TO 4:FOR J=1 TO 4:CO 
OR ね なー PRENT TABL25)YTS も JJLNEXT すけ 。1 

229 FOR !=1 TO 4:LOCATE 37,Ix4-1:COLOR 6 


239 PRINT _M$ も (IT) iCHR$ も (8&H1F ):CHR$(&H1D) : CH 

R$S(&H1D)i "7"j:NEXT 1 

249 REM ----- NZ 2 人 さこ ママ 

259 FOR I=1 TO 4:FOR J=1 TO 13:IF FNAK(I, 

J) く >7 THEN 279 

269 M(I)=M(I)-1:IF P(T,J)=197 THEN 0=I:P 
(IT,J)=9 ELSE P(1,J) = 

279 NEXT J,。I 

269 REM ----- トド) メー ジー ド ニテ ニュ 

299 FOR J=1 TO 13:FOR 1=1 TO 12:IF P(4,I 
) >=P(4 1+1 ) THEN 319 

399 A=P(4。1+1):P(4。1+1)=P(4。!):P(4.【)=A 

9 NE 9 

3 重層 選 MM ニニ ーー ニー PLAYER CARD ショ ウキ ョ & ヒョウ シ ~ 

239 LINE (0.20)>(79。24) "で 7。BE 

349 COLOR 5:LINE (9,29)-(69,29) ,"",5:FOR 
I=9 TO 12:LOCATE IX5.29:PRINT I+1 : :NEXT 6 
I 


359 FOR I=9 TO 12:TIF P(4,[+1)=9 THEN 4099 

369 COLOR 7:FOR J=1 TO 4:LOCATE IX5,29+J 

PRINT T$(J)::NEXT J 

379 A=INT(P(4。1+1 )/100) 

389 LOCATE IX5+42.22:PRINT M も (A): 

399 LOCATE IX5+1.23:PRINT C$ も (P(4、1+1 ) -A 

199 ) 

499 NEXT 1I 

419 1F 0<4 THEN 529 ELSE IF M(O)=9 THEN 
0=1:GOTO 529 

429 REM ----- PLAYER ニ ぅ 2 ウリ ヨク --ーー- 

439 A=9:LOCATE 29.19:COLOR 6:PRINT "の * ス 
NEPUUUT で アナ サタ アプ と ん "3A 

449 IF A<>9 THEN 470 

459 LOCATE 29.19:PRINT "アナ タ ハル 2 スリ 5SPC【( 1 
9)::BEEP:IF PA(4)=3 THEN 529 

469 PA(4)=PA(4)+1:GOTO 739 

479 IF A>13 OR A<9 THEN 430 

4890 IF P(4.A)=9 THEN 439 ELSE B=FNA( 4 。A ) 
:C=P(4.A)\10909 

499 IF (A(FNB(C、B-1 ) ) >9 AND B>1) OR (A(F 
NB(C,B+1 ) ) >9 AND B<13) THEN 519 

S99 LOCATE 29.19:COLOR 2:PRINT "ソレ 用 タ * セ 

マセ ン " 5 BEEP: GOTO 439 

S519 GOTO 609 

S29 IF M(O)=9 THEN 7309 

539 REM ---ー- COM ノ カン ( P.1 - P.3 ) -- 

549 FOR A=1 TO 13:B=FNA(0.A) :C=P(0,A)\19 

9:IF B=9 THEN 569 

S59 IF (A(FNB(C,B-1))>9 AND B>1 ) OR (A(F 
NB(C,B+1 ) ) >9 AND B<13) THEN 69 

S69 NEXT A:COLOR 7:LOCATE 29,19:PRINT "P 
505 "の DAY ス "5EBEEP:PA(O)=PA(0)+1 

S79 IF PA(O)=4 THEN LOCATE 29、19:PRINT " 

P. "210: 7 用 シッ カク "ji:BEEP :GOTO 755 

589 GOTO 73g 

S99 REM ----- カー ト ~ 。 ノ ヒ ヨ ウ シ ~ ーーーーー 

699 A(FNB(C,B) )=1:P(0.A)=9:COLOR 6-C:BEE 

P 1:T=2^2^22^2:BEEP 9 

619 FOR I=1 TO 4:LOCATE Bx5,(C-1 )※4+1+1 : 

PRINT T も (IE): :NEXT 1 

620 LOCATE Bx5+2.(C- 1 )x4+3:PRINT M$(C) :C 

HR$ も ( &H1F ) :CHR$( &HID) :CHR$ も (&H1D ) :C も (B) ・ 

639 M(O)=M(O)-1:IF M(O)>9 OR PA(O) >3 THE 

N 680 

649 COLOR 6:LOCATE 29,19:PRINT "P."i0ji" 

ハ アガ ナリ "EEFOR エ =1 TO 49:BEEP 1 続 次 
659 FOR J=1 TO 49-I:NEXT J:BEEP 9:NEXT I くべ 
669 AR=AR+1:AG=AG+0x19^AR | 
679 REM ----- ノコ リ マイ スウ ヒ ヨ ウ シ ~ ーーーーー こ > 
689 COLOR 6:FOR 1I=1 TO 4:LOCATE IX15,9:P ( 
RINT "P. "iT1i:PRINT USING " -- "5M(1) 〇 O 


ex noe 
Sn 
さて 


パ っ 


=ー 
ごう 
Eee っ 仙 へ 3 あ 


RDC hH ヾ " 閉 


O 
meg 


ーー い 
\ ーー 
CO で E 


ヤ 革 
の NZ 


に 
ビ 


Tk 
っ s ミ 


① 
〇 、 


い 


699 NEXT I:IF M(1)+M(2)+M(3)+M(4)=9 THEN 
800 

799 REM ----- シッ カク シャ ノ カー ト ~ ノ 八 ン テイ 

719 IF A(FNB(C,B-1 ) ) =- 1 THEN B=B-1:IF B> 
9 THEN A(FNB(C,B) ) =1 : GOTO 719 

729 IF A(FNB(C,B+1 ) ) =- 1 THEN B=B+1:IF B< 
14 THEN A(FNB(C,B) )=1:GOTO 728 

739 LOCATE 29,19:PRINT SPC(49)j::0=0+1:IF 
0=5 THEN 0=1:GOTO 299 ELSE 419 

749 REM ----- シッ カク ショ リ 

759 M(O)=9:FOR A=1 TO 13:B=FNA(0,A) :C=P( 

0.A)\199:IF B=9 THEN 798 

769 A(FNB(C,B) )=-1:P(0.A)=9:COLOR 6-C 

779 FOR IT=1 TO 4:LOCATE Bx5,(C-1 )x4+1+1: 

PRINT T$(1)::NEXT I 

789 LOCATE Bx5+2.(C- 1 )x4+3:PRINT M$(C):C 

HR$(&H1F) :CHR$(&H1D):CHR$(&H1D) :C$(B) : 

799 NEXT A:GOTO 739 

699 BEEP:LOCATE 20.19:PRINT "シュ ウ リョ ヨウ テ * ス 
FOR IT=1 TO 59:BEEP 1:FOR J=1 TO 

819 NEXT J:BEEP 9:NEXT I 

829 REM シル イ に ヨリ ウン 

839 J=9:WIDTH 49.29:LOCATE 19,.5:PRINT " タ 

が イマ プー ツラ シイ AA" 


849 AG=AG/19:FOR I=1 TO AR:A=AG- INT(AG/1 
9)x19:AG=AG-A:AG=AG/19 

859 LOCATE 19.5+Ix2:A=INT(A+.5):PRINT "N 

04 を よ ま 3 ニーー PP、T2A5 

869 IF A>3.5 THEN PRINT "(YOU)": 

879 PRINT:NEXT 

889 FOR 1=1 TO 4:IF PA(T)<4 THEN 999 

899 COLOR 2:PRINT:PRINT SPC(19)j:"P.":iIi" 
八 シッ カク " 

999 NEXT I:COLOR 5:PRINT:PRINT TAB(19):" 

Play Again 2 (Y/N)" 

919 AS=INKEY$:IF A$="y" OR A$="Y" THEN R 


1F A$="n" OR A ゃ ="N" THEN END EILSE 91 


REM ※※※※※※ 光 光 区 光 光 光 ※ 区 区 贅 区 区 光 光 光 
REM ※※ 
REM ※※% 
REM 
REM S 59 9/23 (日 ) 

REM 

REM ※※※※ 光 福光 区 光 光 ※ 区 区 光 ※% 区 光 区 XX 天 


メス 上 V 用 5 ) 


田 変 数 リス ト ・ O…… 手 番 

A( )…… シ ャ ツ フ ル 、 場 の 状態 ・ AR…… あ が つた 人 数 
P( )…… 難 プレ イヤ ー の ま 札 : AG…… 順 位 
MC の が の ミク 田 プ ログ ラム の 説明 


OS( )…… カ ー ド の 数 字 


TS( )…… カ ー ド の 形 
PA( )…… 各 プレ イヤ ー の パス 
の 回 数 


M( )… 名 プレ イヤ ー の 手札 の : 


枚数 


10- 40 初期 設定 
60- 7/0 カー ド を 切る 


90 ご 100 カー ド を 配る 、 場 の ・ 


設定 


120-150 マー ク 、 数 字 、 カ ー : 
ド の 表示 用 アー タ 読 : 


み ご こみ 志 
170 一 230 画面 作成 630-660 あがり 判定 、 処 理 
250-270 フ を 持つ て いる プレ ・ 680 一 690 残り 枚数 表示 、 ゲ ー 

イヤ ー を 探し 、 抜 き ム 終 判定 

だ す 710 一 30 場 を 調べ る 
290-310 手札 の 並び か え 750 一 790 失格 が あつ だ 場合 の 
330…-410 札 の 表示 3 処理 
430-520 自分 の ぼ 番 ・ 800-810 ゲー ム 終 了 
o40-560 コン ピュ ユー タ の ま ぼ 番 ・ 630 一 920 順位 表示 


600 一 620 


場 に 出 た カー ド の 表 ・ 


2 NNE Ni 人 ま ハブ 


2 り 8 ※※ リーグ ルド ク マン ※※ 

49 ・ :Programed by M.HANASHIMA: 

69 ・: Date 1984/98/16  : 

80 : [No.N-GB-81: 

199 WIDTH 49.25:CONSOLE 9,25.9,1:DEFINT 


119 HI=9:H=&HE302 

129 SC=9:M=1] 

139 X=18:Y=15:CA=1:PO=9:P1=19 

149 COLOR 5:PRINT CHR$(12)・: 

159 PRINTUSING"SCORE 寺村 盾 9 
ルーク タン 昔 # "5 SC5H1iPI 

169 COLOR 6:LOCATE 16,1:PRINT USING"44 # 

MM "iM 

179 COLOR 7:PRINT 

189 PRINT" HHHHHHHHIIHHHHHI HHHHHHHHI THH 

HHHHHHH" 

20 だ RENT と ーーー ュ BETH ーーーーーー デ ティリー BI 

HmH ロ HH" 

299 PRINT" ローーー ブ プロ IIHIIHIH HIHHHHIHHHH | 

HIIHIIH" 

219 PRINT" HHHHHHHH プロ IIHIHIHIHIHr エ エーーーー ブ 

HIIHIIH" 

229 PRINT” ニーーーー HHGHT THI ロ IE ロ HIH1 DEHGBI 

HIIHITIH" 

239 PRINT“ ニコ 1 エー IH ロ IEIIGHIUHIHIBI ロ デーー ィ 

ーー コロ ブロ" 

249 PRINT" HIIIHIIH ロ IIHIHIHIHIHI ロ トレ ーー 

HHHHHHH" 

259 PRINT" HIIIHII ロ ーーー ロ IHIHIHHHHHHHHI I 

は ーーーー 


HIGH 杜 村 半 半 9 


269 PRINT" ロブ ロロ ロロ HHHHHHIHIHI ロ ーーーーー ロ 1 1 
日 ーーーーーー "' 
279 PRINT" HHHHHHHH ーー テー ロ EHIHHHHHHHHI | 
HHHHIHHH" 
289 PRKINT "ニー 一 一 コロ ーー! 加 ETI ロ FーーーmH ロ と 


日 " 
299 PRINT" ーーー 一 プロ ヒーー ゴ ロー ブロ ーーーーー ロト ーー 


cs ニー 

399 PRINT" HHHHHHHHHHHHHHHHH HHHHHHHHHHH 
HHHHHHH" 

319 PRINT " ロビ ーーーーーー ィ ーーーー ィ ーー [ーーー エーーーーーー 日 
ーー テーーーー ャ は 

329 PRINT" ロロ | ーーーーー HHHHI IIHHHH IE HHHUHHIH 
HHHHHIH" 

339 PRINT" HH HHHHHIIH ロロ トー エーー 一 日 レーーーーーーー 一 
ーーーーー 日 " 

349 PRINT" HH ビー エロ IEIHIIHHHHHHHHHHHHHHEI 

HH" 

359 PRINT" ロー レー ゴト FIHIIHI1IH ロ ーーーーーーー 日 rーーーーー 
ーーーー ニ ーー ディ" 

369 PRINT" ロ ヒ ーーー ロロ 11 ロビーーーーー」 ロロ レーーーーー 
ーー 

379 PRINT" HHHHHHHHHHHI 1 HHHHHHHHHUHUHHHHHH 
HHHHHHH" 

389 LINE (9.2)-(37,.23) 。"@⑩"。4。B 

399 COLOR 1:LOCATE 17.3:PRINT"@ "ELOCATE 
17.5:PRINT"@" 

499 LOCATE 4.19:PRINT"@ "LOCATE 29,19:PR 
INT "人 @" 

41 り ' 回顧 症 証 較 GAME START 加計 是 還 較 


429 COLOR 6 

43 り 9 LOCATE XY:PRINT" る "ECA=CA+1:1=INP(9 ) 
449 IF INKEY$= "9" THEN 849 

459 XX=(|=253)-(T=247):YY=(I=223)-(1I=251 


) 
469 P=PEEK( 昌 +(X+XX ) %2+(Y+YY)x120) 


XX,YY…… 例 の 秘 動 の 際 の 増 


470 C=(P=219)-(P=32):CC=(P=236)-(P=42):C 
1=(P=135 ) 

489 IF CC く >9 THEN C=CC+3 ELSE IF C1 く >9 T 
HEN C=C1+6 ELSE IF C く >0 THEN C=C+2 

499 ON C GOTO 529.579,659.699,639 

S99 GOTO 669 
oO10 ' 回 還 還 証 識 ロロ! 

S529 BEEP1:SC=SC+1:GOSUB 719:PO0=PO0+ 1 : BEEP 
9:1F PO く >327 THEN 650 

539 BEEP1:LOCATE X,Y:PRINT" 
X。Y+YY:PRINT "の ":M=M+ 1 : BEEP9 
549 FOR F=1 TO 599:BEEP1:NEXT: BEEP9 
SS59 GOTO 799 
oO6 り ' 回 還 隊 謗 昌 '@' 

579 LOCATE X,Y:PRINT" 1A=1:A も = "の" 

S89 GOSUB 739:X=X1:Y=Y1:GOTO 669 

oO99 ' 回 還 間 本 間 '※「 

699 BEEP1:P1=P1+1:SC=SC+5 

619 GOSUB 699:GOSUB 719:BEEP9:GOTO 659 

620 '′ 証 還 還 隊 間 右 ' 

639 IF Pl1=9 THEN 669 ELSE P1=P1-1:GOSUB 
699 
649 
659 
669 
OLOR3: GOSUB 739:A$ も ="%"EA=1:COLOR2 : GOSUB7 
17/ 

679 GOTO 439 
680 ' 還 呈 還 較 


"1 LOCATE XX 


FOR F=1 TO 50:BEEP1 :BEEP9 : NEXT 


LOCATE XYEPRINT "=X+XXEY=Y+YY 


ハ ^ ク タン ヒョウ ン ~ SUB 還 還 還 開 


田 交 数 リス ト P1…… 爆 弾 の 数 

HI…… ハ イス コア PO…… 還 を 取 つ だ 数 
SC…… ス コア CA…… 歩 いな 数 

M……… 面 数 ト …… INP 用 

X.Y…… 全 の 座標 A…… 各 キヤ ラフ を 表示 させ 


る 数 


分 Ab…… 表 示さ せる キヤ ラク 
H……V-RAM の 先頭 アド レス 圏 プ ログ ラム の 説明 
2 の の 新 だ な 座 ・ 100 一 130 初期 設定 

標 で の 判断 用 140 一 400 画面 作成 


1999 “SwEEPER BY _ HIDETOSHI .Y 
N88-BASIC Ver 1.9 and 1.1 


1984/12/098 
and 1.3 


1910 回 生 用 BII INITIALIZE | 1 上 邊 目 醒 調 1219 ON 
1929 IF PEEK(&HEEB7 ) く >8&H60 THEN CLS:LOCA 
TE 33、19:PRINT _ "WAIT..... "EGOTO 4920 


1939 SCREEN 9.9:CLEAR、&HE95F:DEFINT A-Z: 
RANDOMIZE VAL(RIGHT$ も (TIME$.2) ) 

1949 DEFDBL S:CMD COLOR 7.9.PSET ,PSET :CM 
D CLS 3 


1230 


1249 


IF CA MOD 299=9 THEN A$=" 較 ":A=15+M:C 


1299 CMD PUT#(61.2) 、"STAGE 
PUT#(61.3) , "REST 
((RO\2) MOD 9)+] 
,・2279.2289.2290 ,2399、2319.2329 2339 
1229 FOR J=9 TO 8:READ A:FOR 
IF (A_ AND (2^1))>9 THEN AR(Ix4+16、 
JX246)=1:GOTO 1269 
LINE(IX32+128.JX16+48)-(Iw32+159、J 
16+64).9,BF:CMD BEEP 59,25 


699 COLOR 5:LOCATE 36.9:PRINT USING"##": 
P1:COLOR 6:RETURN 

799 ' 回 呈 間 本 憲 スコ ア ヒ ヨ ゥ シ ~ SUB 回 還 昌 較 

719 COLOR 5:LOCATE 6.9:PRINT USING"# 持 " 
jSC:COLOR 6:RETURN 
720 ' 問題 還 請 昌 " 圏 ヒ ヨ ウ シ ~ 
739 FOR F=1 TO A 

749 BEEP1:X1=RND( 1 )x37+1:Y1=RND( 1 )x29+3: 
BEEP9 

759 IF PEEK(H+X1x2+Y1x129) く >32 THEN 749 
769 LOCATE X1.Y1IEPRINT A$ 

779 NEXT:COLOR 6:RETURN 


SUB 画 詳 記 世 


盾 村 ":RO:CMD 1439 ON AR(NX、NY ) GOTO 


拉 村 "1 MS 49.1449 


GOSUB 22509.2260 
I=9 TO 12 1459 ON 
9、1519.1519、1499.1499 


9、1499.1499.1499、1499 


AE 
ささ 
さ 


789 り ' 還 症 証 還 時 メン クリ ア 回 証 是 間 
799 BEEP1:COLOR 6:LOCATE 19.8:PRINT "BONU 
S"P1"X 199 ="P1lx1099 
899 SC=SC+P1X19:GOSUB 7109:BEEP9 
819 FOR =1 TO 5999:NEXT 
29 GOTO 139 
′ 還 還 議題 昌 シリ リク (GAME OVER ) 還 還 還 
FOR F=1 TO 299:BEEP1 :OUT81 .,.33 
FOR Fl=1 TO 1:BEEP9:OUT81.32:NEXT : NII 
COLOR 6:LOCATE 12.9:PRINT"xx GAME OV 
ER ※※" 
879 IF HI<SC THEN HI=SC:COLOR 4:LOCATE 1 
9.18:PRINT"You are HI-SCORE !!" 
889 COLOR 6:LOCATE 7.13:PRINT "PUSH [RET 
URN] KEY TO START" 
899 IF INKEY$ く >CHR$( 13 ) THEN 899 
999 GOTO 1290 
420 一 430 $ の 移動 し まつ 
440-500 キー 入力 判断 ・ 690 一 710 名 種 数 値 表 示 サ ブル 
520-550 皿 ( 工 サ ) を 取 つ だ と : ー チ ン 
き の 処 理 ・ 720 一 770 各種 キャ ラフ タ 表 示 
570ー580 ワー プ ホ ー ル に ぶつ ・ サブ ルー チン 
が つ だ と き の 処 理 : 790-820 面 フ リア 処理 
600 一 610 爆弾 を 拾 つ だ ・ 840-900 ゲー ム オ ー バ ー 旭 理 
630-640 障害 物 に あ だ つ だ と ・ 
き の 娘 理 
650 て 670 メイ ン ル ー チ ン あ と ・ バレ クハ 
@ 


1619.1619,.1869,14 


1449 CMD PUT@(CNX、CNY ) 、CL$:CMD BEEP 39.1 
S5:CMD PUT@(NX.NY ) .TT も :CNX=NX:CNY=NY 
(NX=MX)x(NY=MY ) GOTO 1919 

1469 ON AR(NX+EX(IT) 、NY+EY(1IT) ) GOTO 151 


1479 ON AR(NX+FX(IT) 、NY+FY(IT) ) GOTO 149 


IT=IT-1+RNDX2:1F 1T= 
IT=(IT _XOR 4):GOTO 1516 


1959 DIM MM$(2).AR(89.25) ,HX(4) 、HY(4) 、EX 1259 AR(IX4+16.Jx2+6)=9 1489 IF RND>.6 THEN 

(4) ,、EY(4) 、FX(4) 、FY(4) 1269 NEXT:NEXT:FOR Il=1 TO 3:READ AE:X=(A 9 OR IT=5 THEN 

1969 BA$= "ABCDQEFGH" :MM も (1)="I1JKLQMNOP" : MOD 13)*4+16:Y=(A\13)x2+6 1499 IT=IT+1:IF IT=5 THEN IT=1 
MM$ も (2)="QRSTQUVWX"E BK も =" ュ )" 1279 CMD PUT@(X.Y) BB$:AR(X.Y)=3:CMD BEE 1599 ‥ 

1970 CL$=" (Q "に TT$ も ="YZU\@1 0 "+CHR$ P 599.19:NEXT 1519 TX=TX+HX(HT ) :TY=TY+HY(HT ) 


(&H69):BB$= "abcd@efgh":GOSUB 2620 

1975 FOR I=9 TO 39:A$=A$S+BK$: NEXT: BK$=A$ 
1989 BAS=209:H2=3:H3=4:H4=13:MS=3:RO=1:SC 
=9:BH=9:HS=9 

1999 FOR X=12 TO _ 68 STEP 4:AR(X、4)=1:AR( 
X、24)=1:NEXT 

1199 FOR Y=4 TO 24 STEP 2:AR(12.Y)=IEAR( 
68.Y)=1:NEXT 

1119 RESTORE 3359:FOR 1=1 TO 4:READ HX(I 
) 、HY(I) EX(I).EY(I)、FX(I) .FY(1):NEXT 
1129 AR(12.29)=4:AR(68.29)=5:AR(8.20) =1: 
AR(8.18)=1:AR(72.29)=1:AR(72.18)=1 


1339 


1139 COLOR=(4、INT(RNDx7)+1) 1359 ON AR(MX、MY) GOTO 1629、1629.1369.13 ELSE 1349 

1149 FOR Y=9 TO 24:CMD PUT@(9.Y) ,BK$:NEX 69.1369 1599 ‥ 

山 1369 CMD PUTQ(CMX ,CMY ) .CL$:CMD PUT@(MX、M 1699 TX=CTX:TY=CTY:HT=HT-1:IF HT=9 
1159 LINE(237.3)-(616.39) .9、BF Y) 、MM$S(CC):CMX=MX:CMY=MY HT=4:GOTO 1349 ELSE 1349 

1169 LINE(544、169)-(595.176),9.BF:CMD SY 1379 ON 2-CC_ GOTO 1499 1619 NX=CNX:NY=CNY:1IT=IT-1:TE 1T=0 
MBOL(546.164)、"OUT"、1.1.3 1389 IF INP(9)=191 AND BH=9 THEN BH=1:BX IT=4:GOTO 1599 ELSE 1596 

1179 LINE(91、169)-(127.176).9、BF:CMD SYM =MX:BY=MY:AR(BX,BY)=2:CMD BEEP 199.50 1629 MX=CMX:MY=CMY:GOTO 1379 
BOL(93.164)、"IN".2、1.5 1399 ON BH GOTO 1969 1639 ‥ 

1189 CMD SYMBOL(259.6) "XXxx※ SWEEPER 1499 ON AR(MX、MY) GOTO 1429.1429.1819.16 1649 IF MBS>H2- 1 THEN 142W 

甘美 基 党 滞 "。2。 1 2:CMD COLOR 7 49、1699 1659 CMD BEEP 199.150:MBS=MBS+ 1:CC=2:SC= 
1199 CMD PUT#(38.2) 、"HI-SCORE 村 杜 杜 仁 人 "15 1419 SC+25:GOSUB 2049 


CH:CMD PUT#(41.3) 、"SCORE 拉 提 持寺 "15C 


1289 CMD PUT#(79.23) "OUT 
T#(4.23) "BOMB 提 半 半 " 1BAS 
1299 CMD PUT#(4.22 ) "STEP 
1399 FOR I=2 TO 20 STEP 2:CMD PUT@(4、1) 、 
BA$:CMD PUT@(8、1) ,BA$:NEXT 

1319 LINE(79.162)-(93.173).2:TX=64:TY=20 
・CTX=TX:CTY=TYE:NX=28:NY=6:CNX=NX:CNY=NY 
1320 HT=1:IT=3:MBS=9:TI=9:CC=1:MX=36:MY= 
19:CMX=MX:CMY=MY:CMD BEEP 
| IIIM 当 
1349 MX=MX+(INP(9)=239)%4-(INP(9)=191 )x4 
:MY=MY+(INP(1)=254)%X2-(INP(9)=251 ) x2 


"iMB:CMD PU 1529 
39、1539 


革 #"・H2 


9.1349,.1349、1569,.1569 


59 .209 
LOOP | 1 妥当 目 還 瑞 


9.1589,1589.1589.1589 
1579 
9 OR HT=5 THEN 


MAIN 


1429 NX=NX+HX(IT):NY=NY+HY(IT) 


1589 HT=HT+1:IF HT=5 THEN 


ON AR(TX、TY) GOTO 1699.1549.1889.15 


1539 CMD PUTe(CTX、CTY) 、CL も :CMD BEEP 39、1 
S:CMD PUT@(TX、TY) .TT も SE:CTX=TX:CTY=TY 
1549 ON (TX=MX)x(TY=MY) GOTO 1919 

1559 ON AR(TX+EX(HT ) 、TY+EY(HT) ) GOTO 133 


1569 ON AR(TX+FX(HT ) 、TY+FY(HT ) ) GOTO 158 
IF _RND>.5 THEN HT=HT-1+RNDx2:1F HT= 


HT=(HT_XOR 4):GOTO 13460 
HT=1:GOTO 1340 
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THEN 


THEN 


1669 BAS=BAS-1:CMD PUTQ(((19-BAS) MOD 2) 
%4+4、((19-BAS)\2)x2+2) 。CL$ 

1679 CMD PUT#(9.23 ) 、" 拉 "BAS: IF BAS く 1 
HEN 2089 ELSE 1519 

1689 

1699 IF (CC=1 THEN 1429 

1799 FOR MBS=MBS-】 TO 9 STEP -1:CMD BEEP 

199.150:SC=SC+50 

1719 FOR 1=29 TO 6 STEP -2:CMD PUTQ(74、 

) , BA$:CMD PUTQ(74.」+2) 、CL$ 

1729 CMD BEEP 89+1.75:NEXT:CMD PUT@(74., 
6) ,.CL$:MB=MB+1:NEXT :CC= 1:MBS=9 

1739 CMD PUT#(74.23) 、" 壮 半 持 " KMB GOSUB 204 
9:IF BAS=1 THEN 2110 

1749 H1=((BAS- 1 )\H3)xH3+1:IF BAS>H1 THEN 

TBS= BAS-H1 

1759 IF BAS>H4 OR BAS=H1 THEN TBS=INT(RN 
DxH2)+1 

1769 FOR 1=1 TO TBS:CMD BEEP :99.75 

1779 BAS=BAS- 1:CMD PUT@(((19-BAS) MOD 
2)%X4+4、((19-BAS)\2 ) 2+42) ,CL$ 

1789 FOR J=9 TO 199:NEXT:NEXT :CMD PUT#(9 
・23 ) 、" 提 寺 ":BAS: IF BAS=1 THEN 2080 

1799 IF BX>9 THEN CMD PUT@(BX .BY ) ,CL$: AR 
(BX.BY)=9:BH=9:TI=9:GOTO 1519 ELSE 1516 
1899 『' 

1819 CMD PUT(MX+1.MY) 、"1T":SC=SC+1999:GO 
SUB 2049 

1829 FOR 1I=199 TO 9 STEP -19:CMD BEEP 1I. 
39:NEXT:AR(MX 、MY)=9:CMD BEEP 59.199 

1839 H2=INT(RNDX3)+2:H3=H2+1:H4=(18/(H2 
2) ) xH3:CMD BEEP 699、.59 

1849 CMD PUT##(19、22 ) 。" 持 "1H21GOTO 1420 
1859 

1869 IF RND<.6 THEN 1619 ELSE H2=INT(RND 
\3)+2:H3=H2+1:H4=(18/(H2x2 ) ) xH3 

1879 CMD BEEP 399、79:CMD PUT#(19.22 ) , "本 
"2:H2:GOTO 1619 

1889 IF RND<.6 THEN 1699 ELSE H2=INT(RND 
%3)+2:H3=H2+1:H4=(18/(H2x2 ) ) xH3 

1899 CMD BEEP 399,.79:CMD PUT#(19、22 ) "件 
"iH2EGOTO 1699 

1999 " 

1919 FOR 1!=1 TO 129 STEP 5:CMD BEEP !.19 
9:NEXT:CMD BEEP 199.159 

1929 MS=MS- 1 :CMD PUT#(68、3) 。"##" 1MS:CMD 

PUT@Q(MX ,MY ) ,CL$:CMD PUT@(CTX,CTY ) 、CL$ 
1939 CMD PUT@(CNX,CNY ) ,CL$: IF MS く <1 THEN 
2359 ELSE FOR I=9 TO 1599:NEXT 

1949 IF BX>9 THEN CMD PUT@(BX,BY ) ,CL$: AR 
(BX.BY)=9:BH=9:TI=9:GOTO 1319 ELSE 1319 
1959 

1969 CMD BEEP 19.59:CMD PUTQ(BX,BY ) 、 BA$: 
TI=TI+1:IF TI<29 THEN GOTO 1499 

1979 FOR IlI=9 TO 29:FOR J=1 TO 19:CMD BEE 
P J,39:NEXT :NEXT :CMD BEEP 19.1999 

1989 IF TX>BX-9 AND TX<BX+9 AND TY>BY-5 
AND TY<BY+5 THEN CMD BEEP 199,199:CMD PL 
T@(CTX.,CTY) ,.CL ゃ :S51=499:TX=68:TY=29:CTX=T 
X:CTY=TY:HT=1 ELSE S1=9 

1999 [F NX>BX-9 AND NX<BX+9 AND NY>BY-5 
AND NY<BY+5 THEN CMD BEEP 199.199:CMD PU 
T@(CNX 、CNY ) ,C し も ゃ :S2=499+Slxw3:NX=28:NY=6:C 
NX=NX:CNY=NY:IT=3 ELSE S2=9 

2999 SC=SC+S1+S2:GOSUB 2940 

2919 IF MX>BX-9 AND MX<BX+9 AND MY>BY-5 
AND MY<BY+5 THEN 1919 

2929 CMD PUT@(BX,BY ) ,C し $ ゃ :AR(BX.BY )=9:TI= 
9:BH=9:GOTO 1499 

2939 " 

2949 CMD PUT#(48、3 ) 、" 村 拉 半 ##"1SC 

2959 IF NRNDSDDSF 5 THEN RETURN ELS 
E CMD BEEP 29、.1999:CMD BEEP 29.1999 

2969 CMD BEEP 59.19909:MS=MS+ 1 :CMD PUT#(6 
8 .3) 、" 革 持寺 "MSEHS=TINT (SC/19999 ) : RETURN 
2079g 

2989 FOR !=1 TO 129 STEP 5:CMD BEEP 1.10 
3:NEXT:CMD BEEP 199、159 

2999 MS=MS- 1 :CMD PUT#(68.3) 、" 拓 手 "KMS:IF 
MS く 1 THEN 2359 

2199 『' 回 還 II NEXT STAGE | 1 眼目 還 還 
2119 CMD PUT@(MX,MY ) ,、C し ゃ :CMD PUT@(CTX .CT 
Y) ,CL も :CMD PUT@(CNX 、CNY ) ,C し ゃ 

2129 CMD COLOR 5:CMD PUT(49.4) ,"POINT"+S 
TR$(MB)+" x※% 199 =" 

2139 CMD PUT#(58.,4 ) 、" 壮 壮 半 持 ":MBX199:CMD BE 
,EP 399.599 

2149 FOR D=MBX1g99 TO 9 STEP -199:CMD BEE 
P 199.59:SC=SC+109 

2159 CMD PUT#(58.,4 ) 、" 拉 持 半 "1D:CMD COLOR 7 
:GOSUB 2949:CMD COLOR 5:NEXT 

2169 CMD PUTQ(49.4) 、SPACE$( 23) :CMD COLOR 

7 

2179 ON (RO MOD 2) GOSUB 2499:BAS=20:H2= 
3:H3=4:H4=13:MB=9 

2189 FOR !I=9 TO 599:NEXT:IF BX>9 THEN CM 
D PUTQ(BX、BY ) 、CL も :AR(BX .BY)=9:BH=9:TI=9 
2199 RO=RO+ 1 :CMD PUT#(68.,2) 、" 拉 寺 ":RO:ON 
((RO-1) MOD 2) GOTO 1136 

2299 ON ((RO\2) MOD 9)+1 GOSUB 2259、2260 
。2270.2289.2299、2399、2319.2329.2339 

2219 FOR I=9 TO 8:READ A:NEXT:FOR 1=1 TO 

3:READ A:X=(A MOD 13)x4+16 

2220 Y=(A\13)x2+16:CMD PUT@Q(X、Y) 、BB$:AR(X 
・Y)=3:CMD BEEP 599.19:NEXT 

2230 COLOR=(4、INT(RND*7)+1):GOTO 1289 
2249 回 還 8 上 ll STAGE DATA TOP | 1 生還 較 
に | 

2259 RESTORE 3259:RETURN 

2269 RESTORE 3269:RETURN 

2279 RESTORE 3270 :RETURN 

2289 RESTORE 3289:RETURN 

2299 RESTORE 3299:RETURN 

2399 RESTORE 3399:RETURN 

2319 RESTORE 3319:RETURN 

2329 RESTORE 3320: RETURN 


う ざ 


333W RESTORE 3330 : RETURN 

ご 340 還 較 較 有 BWII GAME OVER | 1 上 眼目 目 還 較 
=3S50 FOR 1=1 TO 299 STEP 5:CMD BEEP 1,59 
: NEXT:MB=9:COLOR=(4.4) 

=369 (MD SYMBOL(159.99) 、"GAME OVER !"、4、 
3:1F SC>SCH THEN SCH=SC 

370 CMD_ SYMBOL(89、130 ) . "PLAY AGAIN PUSH 
RETURN KEY 0009.2.1、2 

2389 FOR Il=9 TO 79909:IF INP(1)=127 THEN 

CMD_CLS 2EGOTO 1980 

2390 NEXTECMD CLS 2:GOSUB 2629:GOTO 1086 
2409 『 馬 較 和 BBlIl BONUS STAGE | 1 上 HB 邊 年 還 
2419 CMD CLS 2E:LINE(149.9)-(249.59).7:LI 
NE-(389.59).7:LINE-(489,0)、7 

2429 CMD SYMBOL(229.19) "BONUS STAGE" 
2.5:CMD SYMBOL(169.192) 、"CRUSH" , 2 、1 .2 
2439 CMD COLOR ,、PSET 、XOR:MX=36:MY=12:CM 
X=MX:CMY=MY:TX=36:TY=12:CTX=TX:CTY=TY 
2449 FOR Il=9 TO 199:PSET(RNDx639,RNDx199 
) 、INT(RNDx7)+1:NEXT:TI=89 

2e459 CMD PUT@(CMX 、CMY ) 、MM も ( 1) :CMD PUT@(C 
TX,CTY) .BA$:CMD PUT(34.4) "TIME" 

2469 TX=TX+(RNDx4)-2:TY=TY+(RNDX2 ) - 1 :T1= 
TI-1:CMD BEEP 29.10 

2479 CMD PUT#(38 ,4 ) 、" 提 持 持 " 

EN 2580 

2489 IF TX>79 OR TX<19 OR TY>22 OR TY<8 

THEN TX=RNDx69+19:TY=RNDx14+8 

2499 CMD_ PUT@(CTX、CTY ) , BA$:CMD PUT@(TX.T 
Y),BA$:CTX=TX:CTY=TY 

2599 MX=MX+(INP(9)=239)x2-(INP(9)=191 )x2 
:MY=MY+(INP(1)=254)-(INP(9 )=251 ) 

2519 IF MX>79 OR MX く <19 OR MY>22 OR MY<8 
THEN MX=CMX:MY=CMY:GOTO 2539 

2529 CMD PUT@(CMX 、CMY ) ,.MM$( 1 ) : CMD PUT@(M 
X 、MY ) 、MM$( 1) :CMX=MX : CMY=MY 

2539 IF INP(9) く <>191 THEN 2469 ELSE BEEP 
1 

2549 LINE(319、59)-(MXX8+15.MYx8+7) ,2:BEE 
P 9 


1:IF 1」 く 1 TH 


2559 IF MX<>TX OR MY<>TY THEN LINE(319,5 

9)-(MXX8+15、MYx8+7) 、9:GOTO 2469 

2569 CMD BEEP 399,159:MT=MT+1:CMD PUT(32 

+MT . 24 ) 、"※ 

2579 LINE(319、59)-(MXx8+15,MYx8+7 ) 、9:GOT 

0 2469 

2589 CMD BEEP 199.999:CMD COLOR, 、、PSET :C 

MD PUT#(33.12) "YOUR HIT 本 半 半 "MT 

2599 CMD SYMBOL( 139 .149) , "BONUS 509 ※"+ 

STR$S(MT)+" ="+STR$( 5990xMT ) ,2.2.6 

2699 SC=SC+599XMT:GOSUB 2959:MT=9:FOR 1= 

9 TO 2599:NEXT:CMD CLS 2:RETURN 

2619 “ | 1IIM 上 TITLE 四 IIII 

2629 CMD SYMBOL(89、15) 、"SWEEPER",8.8.1:C 

MD SYMBOL(76.17) 、"SWEEPER" ,8.8,5 

2639 CMD SYMBOL(149.88)。 "BOX 。 .. "2.1:C 

MD PUT@(37.19) .MM も (1 ) 

2649 CMD SYMBOL(349.、88) , "AND" 、2、1:CMD PU 

TQ(59.19) 、MM$( 2 ) 

2659 CMD SYMBOL(149.112). "FIRE .. より.2.1: 

CMD PUT@(37 、13) 、TT$ 

2669 CMD SYMBOL(349.112). "AND"、2、1:CMD P 

UT@(59.13) ,TT$ 

2679 CMD SYMBOL(149.136) “OTHERS. 、" 、2 1 

CMD PUT@(37.1 6 ) , BA$ 

2689 CMD SYMBOL(349.136) 、"AND" 、2、1:CMD P 

UT@(59 ,16 ) , BB$ 

2699 CMD SYMBOL(120.152) "UP=8 RIGHT=6 D 

OWN=2 LEFT=4 (AND SPACE)",1.1.5 

2799 CMD SYMBOL(49.176) "SWEEPER (C) BY 

HIDETOSHI .Y 1984"、2,1 

2719 CMD SYMBOL(19、184) 、"USED ORIGINAL C 

MD COMMAND Version 1.4".2.1.6 

2729 CMD SYMBOL(159.168) , "HIT [RETURN] K 

ETU 2 の 3 <2 

2739 IF INKEY$=CHR$S(13) THEN CMD CLS 2:R 

ETURN ELSE 2739 

2749 芋 BBIII CHR DATA POKE | 1 眼目 生還 琴 

2759 DEF USR1=&HE52D:RESTORE 2810 

2769 FOR I=9 TO 23 STEP 2:READ A$ 

2779 POKE &HE551+IJVAL("&H"+RIGHT も (A も 、2 
):PORE &HE552+1、VAL( "8&H"+LEFT も (A$,2) ) 

2789 NEXT:READ A も :A=USR1 (VAL("&H"+A$) ) 

2799 IF A$="29" THEN 6919 ELSE 2766 

2809 ‥ 回 較 用 NE| PUTO CHR DATA | 1W 肖 明 還 時 較 

2819 DATA 9999,.9999.9999.9999.9199.91091 . 

9797.9F97、.9FOF,9F9E, り DF . 9F9F , 41 

2829 DATA 9999.9999.9999.3F29、C83A.FDEF 、 

FF29.59FF,FEFF .FF89 ,48FF .FFFF , 42 

2839 DATA 9999.9999,.9999.FC99.9989.59FF、 

FF99.99A8.D4FF .FF99.99A9.74FF ,43 

2849 DATA 9999.9999.9999.9990.9990.0908V。 

E990.9999.99F9.F999.9999.99F9,44 

2859 DATA 9F9E.9D9F. り F9F,9F9F、979F.97097. 

9191.9991.9999.9999.9999.9999.45 

2869 DATA FFA2.49FF.FFFF.FF48.A9FF 、FEFF 

FFC8 .39FF .3D3F .9999,.9999.9999.46 

2879 DATA FF99.99AA.74FF,FF99.99A9、C4FF. 

FF99.99A9、49FC、9999.0999.90099.47 

2889 DATA F999.0999.99F9.F999.9999.0909EB9. 

8999.090999.99909.9999.9909.9999.48 

2899 DATA 9999,1F99、9999.99029.2990、009V. 

9720、2999.9999.9929.20999.9999.49 

2999 DATA 9999.FF99.9999.8999,9999、9089、 

FC90 .9999.9984.8499.99909.9984.4A 

2919 DATA 9999.、FF99. り 9999.9999.9999.9999, 

9999.09999.9999、90 り 9、9999.993F .4B 

2929 DATA 9999.F8u9.9999、9994.9490、909V9、 

9994.9499.9999.9094.9499.9999.4C 

2939 DATA 9129、2099.9909.99209.299 り 、90090。 

り 9929.2999.9999.991F、9909.9999、4D 

2940 DATA 9899.9999.9999、9999.9909、9090、 

9 りり 99.9999.0999.99FF.9999、9009,3E 

2959 DATA 9990 り .9999.99FF,9999.9090、.9091 . 

り FE909 .9999.9979.99FF、9999.9909.4F 


=J6 り 9 DATA 0094.9499、99C9、4094.9499.9080 , 
9904、0490.9999.00F8.9909.9999.59 

2979 DATA _ 9990.1F99、9999.9920、2399.W 39.3。 
9F2E.3D9F、1F1F、1F3A、3F1F,1C1C,51 

2989 DATA 90099、FF99.0999.7F79.997F.FEFFF 、 
FFA9、59FF,FFFF.FF89.C7FF.3838.52 

2990 DATA 0099,FF90.9999、FE99.9980.50FF 、 
FF99.996A,D9FF.FF99.31B5 ,CECE、53 

3900 DATA 9909.F899.9999.9994.949 り ,. り 0CW. 
F904.9400.99F8.F894.8499.9978,54 

3919 DATA 1D3F、3B1D,1C1C,1D3F 、2F1D,9C9C、 
9323.2903.0999.991F.9909.99099,55 

3929 DATA D738、C8D7.3737 .D738 .E7D7 .3838, 
FF99.79FF.7E7F.99FF.9009.00999,56 

3939 DATA 55AA、AAS55.5555.5BA4.295B.DFDF 、 
FF99.9968.89FE.99FF .0 り 09.9099、57 

3949 DATA 7884.8499.9978.7884.8499.9070、 
C994.0490.9099.99F8.0999.9999.58 

3959 DATA 0990.0999.99099、9999.9090.9090、。 
9009.0999、0991 ,9399.9999,999D,59 

3969 DATA 0999.9999.9999.0999.99909.0040., 
E999.09909.99F1.F899、9940.C9F1 ,5A 

3979 DATA 9999.9990、9099.9899,0099.991('、 

FC99.9939.99F9.FD99.,9001.1CFC.SB 

3980 DATA 9999.9999.0999.9999.9999、.9099., 
9999、9999、9999.9899.0909.991C,5C 

3999 DATA 1F99.0999.9997、9F99.9999.901F., 
1799、9999.9997.9799,9 り 99,.9991,.5D 

3199 DATA F399.9949.89FD,FF99.9989.99FF, 
3F99.9999.9CCF .FF99.9907,38FF ,5E 

3119 DATA F999.9999,99FF、FF99.9999、009EF 、 
F799,99690、98FF 、FF99.99D8.99FF,5F 

3120 DATA F999、9999,990C9.F999.9999、9080, 
F899、9999.99E9,C999.9909.9980.69 

3139 DATA 9999.9999.99099.9999.9199.0191、 
9697.9F97.9F9A,999F ,9F9F,9C9C,61 

3149 DATA 9999.9999、99099.293E.FF3F 、FF81 , 
99FF ,FCC7 .FF83.9FF9 .EMFC.F91F、.62 

3159 DATA 9999、9999.9999.9989.D4FC,FF90 
99FE,29E3,FFC9 、F99C,973F,9FF8.63 

3169 DATA 9999、9999.0099,.9999.09999.8099, 
9909.89E9、F999.9949.C9F9.3999.64 

3179 DATA 989F、9F9C.9F9A.999F,970F.9706., 
9191.99091,9099.909099.0009,.9999.65 

3189 DATA 1FE9.F9F9,FC0F,43FC,FFFF 、C790 , 
82FF 、3DFF , 3F39 ,9999.9099,0999,66 

3199 DATA F892、9D9F.3FF9.C92B,FDFF 、E3909 、 
99E8.89FF .FC99,9999.9909.9999、67 

3209 DATA 99C9.8939,F099、9999.99F9.E999。 
9999,.0989.9999,9999.0999.9999.68 

3219 DATA 9999.99FD,FD99,9999、99FD,9990、 
9099、99FF,FF99.909909.99FF.9990.69 

3220 DATA 9999.99FF,FF99.9999.099FF.9999, 
9099,99FB,FB99.,0999 .99FB.99099,6A 

3230 DATA 9999.0999、9999,9999.9999.09990、 
9090.9999.9999、9909.99099,090999.20 

3249 本 較 肖 ll STAGE DATA | 1 眼目 四 還 賠 
3259 DATA 7523,.4397.1288.3433.3199,1873., 
4423.1198.7665.1.8.114 : STAGE 1 

3269 DATA 9.49094.2114.954.2794.2962.2194 


・2194.2146.32.119.199 :* 2 
3279 DATA 4611.2745、85.、5893.4599.7595.,44 
21、1364.5291.99.12.13 :* 3 
3289 DATA 9,.4994.584.2779、2974.3394.2154 
,4994.64.19.83.56 ・「 4 
3299 DATA 4661.2689.、84.5925.4253.7493,41 
97.1399.5969.9.12、199 :/ 5 
3399 DATA 7265・4397・1416.3435.3113,1445・ 
4999.1604.7441.39.11.46: 6 


3319 DATA 4369.5461,5469., 2 5461 , 
5461.1364.5125、58.26.62:"* 
3329 DATA 5S153.366 、5954 、 827:6928。 6546,25 


96.758、2562.9,1、.48 2 8 

3339 DATA 1.4993.5.8181.4373.5461,.5461,1 
364.5189、9.199,.47 0 9 

3349 『 回 較 婦 Bill RL SARCH DATA | 1 妥当 生還 
司 

3359 DATA -4.9、9、-2、9、2 ご 9.-2.4.9、-4.9、.4、 
9.9、2.9、-2.9、2.-4.9.4.9 

3360 


4099 ORIGINAL CMD COMMAND Version 1.4 B 
Y HIDETOSHI.Y 

4919 本 較 間 月 BIIIOCC3 LOAD SUB | 1H 昌 上 較 
4920 CLEAR、&HDB3F : RESTORE 4962 

49390 FOR AD=&HDF39 TO _&HE57F 

49409 READ A$:POKE AD,VAL("&H"+AS) 

4059 _ NEXT:DEF USR9=&HDF39:A=USR9(9):GOTO 
2750 


4969 | |IIIMW O0CC3 DATA 11 眼目 自 較 
4062 DATA 21、BF,。BD.22.8B、E9.21.D5.D4.22 、 
89.E9.21、CD、B2、22 | | SUM 41 
4964 DATA F9.E3.21.F3.94、22.FB.、E3.21.18, 
6A.22.FD、E3、21、46 : | SUM 99 
4966 DATA 23.22.B2.F3、21 7E.、23.22.B4 .F3、 
21.66.6F、22、B6.F3 : | SUM 36 
4968 DATA 21.09.99.22.、B8、F3、C3.E7 .DF 99 、 
909.09.99.99.09.99 : " SUM 49 
4979 DATA 99.09,.1F、F5、3E,FF.38.91.AF 、FD. 
79.、21.99.C9.11.91 : | SUM 92 
4989 DATA C9.91、7E、3F、77、ED、B9.D3、5F ,F1 . 
C9.096.98、3A、61.F9 : | SUM 17 
4999 DATA 4F、1A.F3.CB.、19、F5.、38.91.AF,D3、 
SCJAE、77.D3.5F、F1 | | SUM 94 
4199 DATA CB.19.F5.38.91、AF.D3.5D.AE。77 、 
D3、5F、F1、CB、19.F5 | | SUM 183 
4119 DATA 38.91.AF、D3.5EJAE.77.D3.5F 、F1 . 
13.D5.11.59.99.19 | | SUM CO3 
41290 DATA D1.19.CA.C9.96.98.7C、 上 FE、C0.D8. 
D3.5C、1AJAE.77.13 : | SUM 15 
4139 DATA D3.5D.1AJAE.77、13、D3.5E、1A.AE 、 
77.、D3.5F.、13、D5.11 | SUM 1D 
4149 DATA 59.09.19.D1.19,E9.C9.21.69.E9 . 
22.。B7、EE、21.5 ド 、E9 : SUM 7B 
4159 DATA 22.E8.E7.21、33、E3、22.49.ED、21 、 
72.DF.11.A6.89.91 | | SUM 2A 


4169 DATA 75.99.F3.CD.14.E5.ED,、B9.21.B7 、 


田 打 ちこ む ま え に 


を 書き 込 び な ルー チン が 内蔵 さ 
れ て いま す が 、Ver14.1,Ver 


いる 人 は 、 以 下 の 行 を 変更 すれ 
ば 、 ご この 文字 デー タダ 書 き 込 み ル 
ー チ ン (6000 一 6500 行 ) は 打ち こ 
まな ぐ て も よい こと に な り の ます 。 


7E、11、99.89.91.3B : SUM EE 
4179 DATA 99.CD.F2.E4,ED,B9,21.47.66、11、 
3B.89、ED.53.28,.89 SUM C2 
4189 DATA 91.3F、99.ED、B9.21.D7.66.11.7A, 
89、ED、53.44.89、91 ” SUM 4B 
4190 DATA 1D,99.ED,B9.21.91.89.22.88.89。 
21、4D.E9,11.97、89 SUM 8C 
4299 DATA 91.9F,99.ED,B9 ,CD、1D,E5.CD,F6, 
E4、FB,C9、E5.2A,42 : | SUM 38 
4219 DATA F9.22、A4.80.E1 ,F3.ED,79.EB,C3, 
99.909.99.99、99、099 ” SUM 1E 
4220 DATA EB,21.93、E9.91、11.99.ED,B9,C2. 
93.93.69.69.29.91 ` SUM 82 
4239 DATA 94.、E9.99.7E、23.66.6F,DB,79.32 。 
FF,FF,.22.81.E9、EB : | SUM DC 
4249 DATA C3,F7,E9.FF、FF,FF,FF,FF,FF.,FF、 
FF,FF、FF.DB,S53,CE SUM 8C 
4259 DATA CB,D7、BE,9A.Ci, 4D,C1 .4D,C1,4D、 
C1.4D、C1.4D.C1.4D : ′ SUM BE 
4269 DATA C1.4D,C1.4D,C1.4D.C1.4D.C1.4D。 
52.E3、F7,E9.AS5,E2 : | SUM D9 
4279 DATA BE,E9,4B,E1.59,.4D,42、4F,4C。FA、 
CF,D9.F8.F9、D7.CD : | SUM 7B 
4289 DATA 96.18.D5.CF、2C、CD.96.18,42.4B。 
D1.E5,.94.9C,14.1C | | SUM 7C 
4299 DATA 3A,.CI.E6.F3.18.18.EE,20,D3, 49 。 
D5.1D、29、FD.15,.29 SUM 69 
4399 DATA FA,D1 ,EE,29.D3,49.D5 ,1D,29 .FD、 
15,.29.FA、D1 .9D,29 ` SUM 28 
4319 DATA E5.95.29.E2.E1,FB,C9.D7,20.07 、 
E5.CD,9E.5F,E1.37 : | SUM C6 
4329 DATA C9.CD,.A3,.18.FE,91.28.F2.DA,96, 
9B,FE、93.CC.FA、E6 SUM FC 
4339 DATA D2.96.9B.E5.3A,C2.E6,E6.37 、D3 , 
31.3A.C1、E6,F6,.10 SUM B2 
4349 DATA D3.49.3E,89.F3.D3.79,3A,1F,F9, 
9E,5C,CD.A6,89,.09E SUM BB 
4359 DATA 5D.CD,A6.89.9E,5E,CD,A6,89,3A, 
FF、FF、D3.79、FB,3A ” SUM 5F 
4369 DATA CIJE6.D3.49、3A.C2.E6.D3.31.E1 , 
C9.D7,FE、28.F5.28 : | SUM 64 
4379 DATA 96.D7,FE,28.C2.93.93.D7,CD,A3. 
18,FE,59.D2.96,9B SUM EB 
4389 DATA 32.FC。FF,CF ,、2C,CD,、A3、18,FE,19。 


D2.96.9B,E5,.26.99 : | SUM B5 
4399 DATA 6F,11.89.92、CD,5A,23.16.99、3A, 
FC,FF、5F,19,11.99 : ′ SUM 29 


4499 DATA C9.19.22。F8.FF、22.FA、FF、E1.CF, 
29.CF、2C,F1J。FEE,49 : | SUM 19 
4419 DATA CA.54、E2.FE,23.CA,BI 、E1 .CD,D3 、 
11.E5,F7.28.96,CD : ′ SUM 95 
4429 DATA D9.28.CD,FC,54.CD,CC,56,AF,32 。 
2F、E2、CD、23.E2.E1 : | SUM A9 
4439 DATA C9.CD,D3.11.E5,CD,56.22.3E,C8, 
32.2F,。E2.CD、CC,56 : | SUM DC 
4449 DATA CD,23.、E2.94.95、CA,96.9B,78.E1 , 
F5,.CF,3B.,CD.D3, 1 1 ” SUM BF 
4459 DATA F1,E5,F5,CD,95,22.CD,D9 ,28 ,CD, 
FC.54.CD.CC.56.F1 : | SUM 11 
4469 DATA 46,.95.99.38.28.28.26,E5,47 、C5, 
1E、29.CD、C5.E4.C1 : | SUM EF 
4479 DATA 11.BD,E9.2A,F8、FF.C5 ,F3, 3E,89. 
D3,79.CD,BF、89.3A : ′ SUM D?7 
4489 DATA FF、FF,D3.79.FB,C1.21.F8,FF,34. 
19.E4.E1JAF,32.2F : ' SUM 2E 
4499 DATA E2.46.23.7E,、23.66.6F,7E、FE,20., 
29.92.23.95,CD,2C : |) SUM Ag 
4599 DATA E2.E1 .C9.46.23.7E,23.66,.6F,94, 
18.25.7E,FE,23.C8 SUM 13 
4519 DATA E5.5F,C5,CD.C5,E4,11.BD,E9 ,2A, 
F8、FF,F3.3E,89,D3 SUM DB 
4529 DATA 79.CD,BF,89.3A,FF,FF,D3.79 、FB, 


21.F8,FF、34、C1、E1 : | SUM E@ 
4539 DATA 23.19.D9.C9.CD,D3.11.E5 CD,56, 
22、CD、CC、56.46,.23 : ' SUM 98 
4549 DATA 7E,23.66.6F,94、18.29.7E、FE,49, 
28.28.E5、26.99,.6F : ′ SUM 41 
4559 DATA 29.29.29.54.5D,29,.19,11.99、68, 
19.EB,2A,F8.FF、C5 : ′ SUM DI 
4569 DATA CD,FB,E4.CD、F8.89.CD、94.E5,C1, 
21.F8,FF、34.E1,23 : ' SUM B8 


4579 DATA 19.D5、E1.C9.E5.2A,FA,FF.,11.80、 
92.19.22.F8.EF .22 ” SUM 7E 
4589 DATA FA,FF,E1.18.EA,D7 ,FE,2C,20,.98, 
3A、1E、F9.32.61.F9 : ′ SUM D9 
4599 DATA 18.13.CD,A3.18.FE,98.D2.96.9B. 
32.6i,F9,.2B.D7.C8 SUM E9 
4699 DATA_ FE,2C、C2.93.93.D7,FE,2C.28、1A, 
CD,、A3.18、B7,29、99 ” SUM 2D 
4619 DATA D3.68.3E,C3、32.48.ED,18.93.CD, 
33,E3.、2B、D7、C8 、FE SUM 69 
4629 DATA 2C,C2.93.93.D7,FE、2C,28.27 FE, 
CF、209.94.9E、99.18 : SUM EB 
4639 DATA 97、FE,FA,C2.93、93.9E,AE、,3E, 89, 
D3.79.79.32.CF 、80 ” SUM 9E 
4649 DATA 32.DC、89.32.E9.89.CD,1D,E5.,D7 , 


1.3 の 場合 


本 プロ プラム に は 、 文 字 デ ー ・: ど /980 


1.3BASIC を 使用 し て いる 人 ・: 
お よび 、 漢 字 ROM を 使用 し て : 


1 ) N88-BASIC Ver1.1、Ver 


IF AS=*20? 
下 計 EN 1 の 3 の ELS 
E 2 の 7Z760O 

2 ) 漢字 ROM の 場合 
6 の 1 の POKE 8HE 
どら 324、8HE6・ POKE 
&HE4AO, 8&H6 1 : PO 
KE 8&HE4A1. 8&H フ 1 
6020 POKE 8HE 
の 2A8, 823 : POKE 


C8.FE.2C.C2.93.93 : | SUM 19 
4659 DATA D7.FE,CF,29.94.9E,99.18.07,FE、 
FA,C2.93.93.9E,AE : | SUM 91 
4669 DATA 3E,89.D3.79.79.32.91.81.32.97 。 
81.32.9D、81、CD,1D : | SUM 92 


4679 DATA E5.D7.C9.E5.21.66.79.3A,88,EF, 
FE.19.39.93,21.5SB SUM D8 
4689 DATA 79.3A.89.EF,FE.59.F3,.CD.,D1 ,6F, 
FB,3E、C9.32 .48,ED ′ SUM D9 
4699 DATA E1I.C9.96.95.11.98.E4,ED.53.5F、 


F9.11.B4.E9、1A.23 : | SUM B3 
4799 DATA BE、C2.93.93.13.19.F7.D7.CD,F2, 
E4.CD,98,7D,CD,C9 : |) SUM ji9 


4719 DATA 64.D2.96.9B,CD,F6,.E4.CF,2C.CD, 
D3。11、ES.CD、56,22 SUM C4 
4729 DATA CD,、CC.56.22.3B,F9.E1.CF、2C.CD、 
A3.18,.B7、CA,96,9B : | SUM 32 
4739 DATA 32.3D,F9.CF,2C.CD,A3.18.B7,CA, 


96.9B,32.3F,F9、CD : | SUM A2 
4749 DATA F2.E4.CD.34.7E.2B,D7.28.96,CF, 
2C,FE,2C,29、93.AF : | SUM 7C 


4759 DATA 18.98.CD,A3.18、FE,94、D2.96,.0B、 
32、49、F9.2B、D7.3E : SUM 2F 
4769 DATA 93,.28.11.CF.2C.11.B9,E9,91.05, 
99,EB,ED,B1.C2.96 : ′ SUM 38 
4779 DATA 9B,EB,D7.79.32.41、F9,E5,2A,1A。 
F9.22。F8、FF、2A。1C SUM 21 
47890 DATA F9.22.FA,FF,3A、41.F9.87,21.EA。 
69.16.99、5F,19.7E : SUM 74 
47990 DATA 23.66.6F.22.42.F9,2A,3B,F9,46。 
23,7E、23.66,6F,22 SUM A2 
4899 DATA 5C,F9.CD.94.E4.C5.3A,BB,E9,47, 
ED,5B,FA、FF.C5,E5 SUM 66 
4819 DATA CD,、83,E4.E1.3A.B9、E9、47.7E,22 
3B,F9.2A、F8,FF,C5 SUM E9 
4829 DATA 4F,3A,.5E,F9.99.B7、20、9A、E5 ,2A, 
3B,F9、23.4E,22.3B ” SUM 59 
4839 DATA F9,.E1.79.F5.CD,79.E4、FI,D5,97 。 
F5,3E,89.D3.79、DC : | SUM FF 
4849 DATA 99,.89.CD,1D,E5,F1.2A.1A,F9,23, 
22.1A,F9.D1,C1,.19 SUM 65 
4859 DATA CE,.2A,3B,F9,23.ED,5B,29、F9,13, 
C1.19.B1.2A、1A,F9 ` SUM 79 
4869 DATA 23.22.F8.FF,.C1.2A.5C,F9,23,19、 
94.CD、F6、E4 、E1 .C9 ′ SUM 8B 
4879 DATA D5.44.4D,3A,3D,F9,5F、16,.99,19。 
2B,22.1A、F9,22.27 SUM FB 
4889 DATA F9,.D1 .C9.C5.26,.99,3A,3F 、F9,6F 。 
19,.2B,22、1C,、F9,22 SUM E1 
4899 DATA 29.F9.C1.C9.2A,5F,F9、E9,2A,5C。 
F9、SE.16.91.C5.CD SUM 82 
4999 DATA C5、E4.C1.21.BD,E9.3A,B9 ,E9,FE, 
19.3E、98.28、91.AF SUM 39 
4919 DATA 32.5E,F9.C9.2A,5C,F9.56,23,5E., 
22.5C、F9.95.78.B7 : ′ SUM 38 
4929 DATA 29.DC,94,18.D9.3E,98.32.B9,E9,* 
32.BB、E9。16.99.EB : ′ SUM E2 
4939 DATA 29.29.29,11.99.7B,19.11.BD、E9, 
91.98.99、CD,9B,E5 : ′ SUM 9D 
4949 DATA ED.B9.CD,94.E5.C9.16.91,CD,F2 , 
E4.CD,61.72.CD,F6 ” SUM 39 
4959 DATA E4.C9.3E,FE,18.92.3E,FF,D3,71 , 


C9.F3.3A.C2.E6.F6 : | SUM 18 
4969 DATA 92.D3,.31.C9.3A,C2.E6 、D3.31 ,FB, 
C9.F3.3A.C2、E6,F6 : | SUM 44 


4979 DATA 94.D3.31 .C9.DB,79.32,FF ,FF,3E, 
89.18.93.3A,FF.FF "SUM 5D 
4989 DATA D3.79,.C9.11.B4.E4.ED,53.5F 、F9, 
C3.67,、E3.3E,、92.CD ” SUM 5E 
4999 DATA 96,.17,7E,26.99.6F、29.29.29.54. 
5D,29.19、11、99.68 SUM A7 
5999 DATA 19.EB,21.51.E5.91.18.99.CD,FB. 
E4.ED,B9 ,CD.94.E5 ” SUM 73 
5919 DATA C9、99.99,99.99,99.99、99.09,90, 
99,.99.99,99.99.99 ”・ SUM C9 
5920 DATA 99.99.99.99.99.99.99.99,99、90、 
99.99、99,99,.99、99 SUM 99 
5939 DATA 99,.99.99.99.99.99.99,.99,.99.909、 


99.09.09、99.99,.99 SUM 99 

5949 『' 

6999 ' 蘭 還 BIII ASC &H29"&H7ZB CHR DATA II 
IIII | 


6919 RESTORE 6959:FOR AD=&H7C99 TO &H7ED 
選 

6920 READ A$:POKE AD,VAL("&H"+A$) 

6939 NEXT:POKE &HE4DE.&HFB:POKE &HE4DF ,& 
HE4:GOTO 1039 

6949 Blll CHR DATA 11WMBW 

6959 DATA 99.99.99.99.99.99.99.99.98、98。 
98.98.99,.99.98.90 SUM 28 

6969 DATA 24.24.24.99.099.99.99.99、24.24., 
7E.24、7E,24.24.99 SUM 1C 

6979 DATA 98,.1E.28、1C,9A、3C,98.99.99,62.。 
64.08,.19.26.46.99 : ' SUM 92 

6989 DATA 39,.48.48.39.4A.44、3A,99.94,98., 


TO 1030 
画 変 数 リス ト (BASIC) 


る や ガ が 


石 サ ー チ 用 
MXMY…… 上 自分 の 座標 
CMXCMY…… 前 の 座標 
TTYINXINY…… 英 座標 


8&HEOA9. SHE5 : GO 


AR(。)…… そ この 座標 に 何 が あ 


MX IYO 江 ( 選 Y 上 多 
(YK Jo 攻 キ 2 ラグ クタ の を 


AA = 


19.09、99.99.99.09 SUM D4 
6999 DATA 94.98.19.19,.19.98、94.99.29.19, 
98.98.98.19.29.99 : ' SUM C9 
6199 DATA 98,2A、1C、3E.、1C.,2A,98.99.99,.08, 
98.3E,、98.98.99.99 SUM 38 
61190 DATA 99,.99.99.99.99.98、98,.19.99.00。, 
99,7E,99、99,909,99 SUM 9E 
6129 DATA 99.99.99.99.99,.18.18.99.99、92, 
94.98.19.29.49.00 SUM AE 
6139 DATA 3C,42.46、5A.62、42.3C,99.98、18、 
28.98.98.98.3E,99 ” SUM 9C 
6140 DATA 3C、42.92、9C,39.49.7E,99.3C,42. 
92.1C,92.42.3C、99 SUM 96 
6159 DATA 94.9C、14.24.7E、94.94.99.7E、40, 
78.94.92.44.38.09 ` SUM 86 
6169 DATA 1C、29.49.7C、42.42.3C,99.7E,42. 
94、98,19.19、19.99 : ' SUM B4 
6179 DATA 3C,42.42.3C,42.42.3C,99.3C。42, 
42.3E,92.94.38.99 : | SUM F8 
6189 DATA 99,.99.98.99、99.98.99.99.09.099. 
98.99.99、98.98.19 : ' SUM 38 
6199 DATA 9E、18.39.69.39.18.9E,99.99.90, 
7E,、99.7E,99.99.09 ” SUM 98 . 
6290 DATA 79.18.0C,96.9C.18.79.99.3C,42. 
92.9C、19.99.19.99 SUM DA 
6219 DATA 1C,22.4A、56,.4C,29.1E,99.18、24. 
42.7E、42.42.42.99 ” SUM 2A 
6220 DATA 7C、22.22.3C、22.22.7C、99.1C,22. 
49.49.49.22.1C,90 "SUM F8 
6239 DATA 78.24、22.22、22.24、78.99,7E,40, 
49.78、49.49.7E.99 : ' SUM 12 
6249 DATA 7E,49、49.78.49、49,49、99.1C,22。 
49,4E、42.22、1C、99 ` SUM 82 
6259 DATA 42.42.42.7E、42.42、42.99,1C,98, 
98.98.98、98,.1C,90 ” SUM 6A 
6269 DATA 9E、94.94.94.94.44.38.99,42.44, 
48.79.48.44.42.09 SUM A6 
6279 DATA 49.49.49.49,49.49.7E,99.42.66, 
5A,5A,42.42.42.99 : ' SUM 289 
6289 DATA 42.62.52.4A,.46.42.42.99.18,.24. 
42.42.42.24.18.099 ” SUM 48 
62990 DATA 7C.42.42、7C,49、49、49.99.18,24. 
42.42.4A,24.1A,99 "SUM 84 
6399 DATA 7C、42.42.7C、48.44.42.99.3C,42、 
49.3C,92.42.3C,.99 : | SUM C4 
6319 DATA 3E.98.98.98.98.98、98.99、42.42, 
42.42.42.42.3C,99 SUM 36 
6329 DATA 42.42.42.24.24.18、18,.99.42,42、 
42.5A,5A.66.42.99 : ' SUM 69 
6339 DATA 42.42、24.18.24.42.42.99.22.22、 
22,1C,98.98.98.90 ` SUM 92 
6349 DATA 7E,92.94.18.29.49.7E,99,3C、29 、 
29.29.29.29、3C、99 : ' SUM 92 
6359 DATA 22.22.14.3E.98.3E.98.99.3C,94、 
94.04.94、94.3C、99 : ' SUM 79 
6369 DATA 98.14.22.99.99.99,99.99,99,099, 
90.99.99、99.7E,90 "SUM BC 
6379 DATA 99.99.909.99,.99.99.99.99.99,09. 
3C,94.3C、44.3A.99 ” SUM FA 
6389 DATA 49.49.5C,62.42.62、5C,99.909,90., 
3C、42.49.42.3C。99 "SUM 7A 
6399 DATA 92.92.3A,46.42.46.3A,99.09,99, 
3C,42.7E、49.3C.99 : ' SUM BE 
6499 DATA 9C,12.19.7C.19.19,19.99,.99.90, 
3A,46.46.3A,.92.3C SUM 18 
6419 DATA 49.49.5C,62.42.42.42、99、98,99, 


18.98.98.98、1C,99 : ' SUM 58 
6429 DATA 94.99.9C,94.94.94.44.38,49、49, 
44.48.59.68,44.99 : ' SUM A9 


6439 DATA 18.98、98.98.98.98.1C、99.99、99, 
76,49.49.49.49.99 SUM F6 

6449 DATA 99.99、5C、62.42.42.42.99.99,90. 
3C、42.42.42.3C,99 SUM C2 

6459 DATA 99.99.5C,62.62.5C,49.49,.09,99, 
3A,.46.46.3A.92.92 : ' SUM 96 

6469 DATA 99.99.5C,62.49,49.49.99、09、99, 
3E,49.3C,92、7C,99 SUM B6 

6479 DATA 19.19、7C,19.19.12.9C,.99、99.09、 
42.42.42.46.3A.99 ”。 SUM 29 

6489 DATA 99,.99,.42.42.42.24.18.99.99、09, 
41.49.49.49.36.99 : ' SUM 54 

6499 DATA 99.99.42.24.18.24.42.99、99、99, 
42.42.46.3A.92.3C SUM 26 

6599 DATA 99,.99.7E、94.18.29、7E、99.0E,19。 
19.209.19、19.9E.99 SUM B4 

7990 較 較 還 8WIi CHECK SUM PROGRAM | 1 上 目 四 固 較 

7919 PRINT "DF36 0 

7929 FOR AD=&HDF39 TO _&HE57F 

7939 MA=PEEK( AD ) :COU=COU+ 1 :SUM=SUM+MA :M 

A$=RIGHT$( "9"+HEX$(MA ) . 2 ) 

7949 IF COU く <>16 THEN PRINT MA$+" 、"・ 

7959 IF COU=16 THEN PRINT MA や $+" : | SUM 
"+RIGHT$( "9"+HEX$(SUM) , 2 ) :COU=9:SUM=9:P 

RINT _HEX$S(AD+1)+" AN 


7969 NEXT 

CTX.CTY.CNX.CNY 
2 敵 の 前 の 座標 

BX.BY…… 爆弾 を お いた と き 
の 中 標 

BAS-…… 爆 弾 の 数 

H2……1 回 に 取れ る 爆弾 の 数 

H3……H2+ 1 

H4 …… コ ンピュータ ガ が 取る 爆 

弾 の 最大 数 
MS…… 自 分 の 数 
RO ee 面 数 


レル ノ 


BH……: 爆 村 セ ツ ト の フラ グ 
HTJIT…… 英 の 廊 向 
MBS…… 取 つ だ 爆弾 の 数 
CC…… 爆弾 の 有無 の フラ ブ 
MB…… 渡 し だ 爆弾 の 数 
ここ の 火 を や つつ け だ と 


き の 点 数 
MI Po ボー ナス ステ ー ジ で や 
つつ けた 数 


MM$( )…… 自 分 の デー タ 

BA や S…… 爆 半 の デー タ 

上 bo 敵 の デー タ 

B 旨 夫 nse カウ ンタ 数 を 変え る 
キヤ タン タダ の デー タ 

虹 プロ プラム の 説明 (BASIC) 

1020-1320 初期 設定 

1340 一 1400 自分 の 移動 

1420 一 1560 敵 の 移動 

1600 一 1620 敵 の 方 向 の 決定 

1640 一 1670 爆弾 を こと る 

1690 一 1790 爆弾 を 渡す 

1610 一 1640 自分 で STEP 数 

を 変え る 


1660 一 1690 敵 が GT ヒビ 数 を 


1910 一 1940 
1960 一 2020 


2040 一 2060 
2060 一 2080 
2100 一 2230 
22502330 


2340 一 2380 
2410 一 2600 
2620-2730 
2/50 一 2/90 


2610 一 3230 
3250 一 3330 
3350 

4020 一 4050 


4060-5030 
6010 一 6030 


6050 一 6500 
7010 一 7080 


変え る 

や られ た 1 

爆 弾 を お い だ 、 比 
弾 の 爆発 
スコ ア 表 示 

や られ だ 2 

次 の 面 へ 
面 デ ー タ の RE 
TORE 指 定 

2 Po オー ルル 
ボ に ジグ ベ ナ ー 
ダイ トル 表示 
2 クタ ター 
読み こみ 

や セラ クタ デー タ 
面 デ ー タ 
ーー チ 用 デー タダ 
オリ ジ ナ ルコ マン 
ド 読 み 込み 
た で トン 
ド 用 デー 
文字 デー 読み こみ 
文字 デー タデ ー タ 
チエ ッ ク ザ ハム 


っ の @ @ の @ の @ @ @ ら の @ の @ の の @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @  @ @ @ @ @ @e @ e @ @ @ @ @ @e @ @ e @ @ @ @ @ @e @ @e @e @e @ @ @ @ @ @ @ 


田 ワー クエ リア 
F03BーF060 シン ボル 用 ワー 
2 プ エ リ ジン 
F061 カラ ー コ ー ド 
FFFGーFFFE G-RAM ア 
ドレ ス 、 汎 用 
デス に ド 、 の マ 
ンド ドウ オッ セ 
ツ ト 胃 避 用 
圏 チ ェ ッ クボ ポイ ント 
ご この プロ グラ ハム で 使っ つて いる 
オリ ジ ナ ルコ マン ド に 興味 の あ 
る 人 は 、 ポ シェ エッ ツ ト 編 集 部 「S 
WEEPER,CMD 命 令 文 説 明希 
望 」 係 まで 返信 用 の 封筒 を 同封 
じ て 申 し 込 る で くれ 。 ルー) 


FFFF 


一 チ ェ ッ クサ ム の つか いか た 
④4050 行 、NEXT の すぐ あと に 
END を いれ る 。 

② 1 回 走ら せる 。 

③RUN 9000 を 実行 
⑳CRT 上 に で て くぐる チエ ッ ク 
サム を リス ト の も の と 、 み ぐら 
べ る 。( 4062 行 の デー タ ガ ら 次 々 
と で て ぐる の で 、 適 当 に ICTRL 
填 S[ で と め な が ら 確 認 す る ) 
⑤ ま ちがい を 発見 し た ら 、BA 
SI| じ ビリ スト の 対 記す る 行 を すみ 
や か が に 変更 し 、③ に も どる 。 
まち が い の な いこ と を 確認 し 
だ ら 、 の ① で つけ だ END を と り の 
は ず し て RUN す れ ば OK。 
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し 
@ 
【】 
@ 
@ 
9 
ロ 
ロ 
【】 
@ 
9 
] 
@ 
9 
@ 
@ 
【】 
【】 
@ 
ゃ 
【】 
@ 
@ 
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1 REM------------- カメ ン 1 --ーーーーーー ニ ーーーー 
2 CLS:CONSOLE, ,9,9:INPUT" PLAYE 
R・1 or 2":PR 

3 IF PR<1 OR 2<PR THEN 29 


49 PLAY"S9M1999905G2R4A2R4B-A2E+ 4G4 .R2" 
59 PLAY"S9M1999905G2R4A2R4B-A2E+ 4G4 .R2" 
69 SCREEN 4.2.2:CLS:RESTORE 1469 

79 FOR !=1 TO 5 

89 READ A,B,C,D$ 

99 LOCATEA,B:COLORC:PRINT D$:NEXT 1 

199 FOR 1I=1 TO 9 

119 READ A,B,C 

129 KANJI(A,B),2.C:NEXT 1 
139 IF STRIG(9)=9THEN 139 
カメ ン 2 
159 SCREEN4,3.3:CLS:RESTORE1539:X=25:Y=4 
:PK=19:PT=19:OW=799 

169 FORI=1 TO 6 

179 READ A 

189 CIRCLE(215.199),A.2:NEXT 1 

199 FORI=1 TO 51 

299 READ A,B,C,D 

219 LINE(A,B)-(C,D),2:NEXT 1 

229 FORI=1 TO 62 

239 READ A,B,C,D 

249 LINE(A,B)-(C,D),4:NEXT 1 

259 FORI=1 TO 19 

269 READ A,B,C,D 

279 PAINT(A,B) ,2.2:PAINT(C.D) ,3,.2:NEXTI 
286 PAINT(218.93),4.2:PAINT(215.199),4,2 
・PAINT(215.69) ,4.2 

299 FORI=1 TO 29 

399 READ A,B,.C,D$ 

319 LOCATEA,B:COLORC:PRINTD$:NEXT I 

329 LOCATEX ,Y:COLOR4 : PRINT"@" 

339 ニュ ー リ ョ ク 1 
349 
359 


FORI=1 TO 5 

LOCATE9,.2:PRINT Iw21 "7 29 

369 K$(1I)=INKEY$:IFK$ も (IT)=" "THEN 369 

379 PLAY"S9M1999F":K(1)=VAL(K も (1) ):IFK(I 
) =90RK( ! ) >5THEN 369 

389 IFK(I)=5THEN436 

399 IFK(I)=2THENPRESET(Ix16-1.57 ) :GOTO042 
9 

499 IFK(1I)=3THENPRESET(Ix16-1.52) :PRESET 
(Ix16-1,57):GOTO426 

419 IFK(I)=4THENPRESET( TIx16-1 .47):PRESET 
(IX16-1 ,52):PRESET(Ix16-1.,57) 

429 PAINT(IX15-1.59) .3,2 

439 LINE(0.29)-(59,39),1.BF:NEXT I 

449 LOCATE9.2:PRINT"39 2":K$(6)=INKEY$: 1 
FK$(6)=" "THEN449 

459 PLAY "SM1999F":K(6)=VAL(K$ も (6 ) ) : IFK(6 
) =9ORK( 6 ) >5THEN446 


469 IFK(6)=5THEN510 

470 IFK(6)=2THENPRESET(95.57 ) :GOTO599 
489 IFK(6)=3THENPRESET (95 ,52) :PRESET(95, 
57 ) : GOTO599 

499 IFK(6)=4THENPRESET (95 ,47 ) : PRESET( 95 、 
52):PRESET(95,57 ) 

599 PAINT(94.59).,3,2 


6 の 


519 LINE(9、29)-(59,39) ,1.BF:IFPR= 1THEN73 999 SK=K(1)x2:ST=T(1)x2:GOTO 1959 

9 1999 SK=K(2)%4:ST=T(2)%4:GOTO 1059 
529 REM----ーーーーーーーー ニュ ラー リ ヨ ク 2 -ーーーーーーーーーー 1919 SK=K(3)x6:ST=T(3)X6:GOTO 1959 
539 FORI=1 TO 5 1929 SK=K(4)x8:ST=T(4)x8:GOTO 1959 
549 LOCATE9.9:PRINTIW21 リ 72 リ 1939 SK=K(5)x19:ST=T(5)x19:GOTO 1959 
559 T$(I)=INKEY$:IFT も (1 )=" "THEN559 1949 SK=K(6)x39:ST=T(6)x39 

569 PLAY"S9M1999F":T(T)=VAL(T$ も (1 )):TFT(I 1959 PK=PK+SK-EK 

)=90RT( IT ) >5THEN550 1969 IFPR=1THEN1989 

579 IFT(I)=1THEN639 1979 PT=PT+ST-ET 

589 IFT(1 )=5THEN649 1989 OW=OW+EK+ET-SK- ST 

599 IFT(I)=2THENPRESET(Ix16-1。127) :GOTO 1999 LINE(64.89)-(194.99),1.BF:LINE(64.,1 
639 59)-(194.169)、1.BF 

699 IFT(I )=3THENPRESET(IxX16-1,122) :PRESE 1199 LINE(64.189)-(194.199),1,BF 
T(IX16-1.127):GOTO 639 1119 LOCATE9,.8:COLOR4:PRINT PK 


619 


T(IX16-1,122) 
629 PRESET(Ix16-1.127) 
639 PAINT(Ix15-1.,129) ,3,2 


649 LINE(9.99)-(59、199),1.BF:NEXT 1 
659 LOCATE9,9:PRINT"39 2":T も (6)=INKEY$: 1 
FT$(6)=" 


"THEN659 
669 PLAY"SOM1999F":T(6)=VAL(T$ も (6) ):IFT(6 


)=90RT(6 ) >5THEN659 
679 IFT(6)=5THEN720 


689 


IFT(I)=4THENPRESET(Ix16-1,117):PRESE 


IFT(6)=2THENPRESET (95 , 127):GOTO 719 
699 IFT(6)=3THENPRESET(95,122 ) :PRESET(95 


1120 
1136 
1149 
11569 
1169 
1179 
1189 
1199 


FORI =1 


LOCATE9.15:COLOR4:PRINT PT 
LOCATE8.18:COLOR3:PRINT OW 
IF PR=2 THEN 1169 
IF PK<1 THEN 1279 
IF _PK く 1 _AND PT く 1 THEN 
IF OW く 1 THEN 1349 


1270 


TO 6 


PAINT(IX15-1.59).1.2:PAINT(IX15-1 ,1 


29).1.2:NEXTI 
1299 FORI=9 TO 15 


1219 NEXT 1! 
1229 FORI=1 


TO 6 


,・127):GOTO 716 
799 IFT(6)=4THENPRESET(95,117) :PRESET(95 
・122):PRESET(95,127 ) 


719 PAINT(94,129) ,3,2 

729 LINE(9.99)-(49,199) ,1,BF 

739 REM------ーーーーー ニ ーー ホホ ~ ーー ルル ーーーーーーーーーー ニ ーー 
749 LOCATEX 、Y:COLOR1 :PRINT "@ " 

759 RESTORE1960 :PL=INT(RND( 1 ) 29+ 1 ) : V=PL 
+89 

769 FORI=1 TO V 

779 READ A,B 

789 LOCATEA,B:COLOR4 :PRINT"@":PLAY "Sg9M39 
9B36" 


799 LOCATEA,B:COLOR1:PRINT"@":NEXT 1 
899 LET X=A:LET Y=B 
819 LOCATEX、Y:COLOR4:PRINT"@" 


820 REM-----ーーーーーーーー ジア デイ ーー ニニ ミニ ーー ュー ューー 
839 IFPR=1THEN T(1)=T(2)=T(3)=T(4)=T(5)= 
T(6)=9 

849 FORI=1 TO 6 

859 IFK(I)=5 THEN K(I)=9 

869 NEXT I 

870 IFPR=1THENT( 1 )=9 

889 FORI=1 TO 6 

899 IFT(I)=5 THEN T(I)=9 

999 NEXT I 

919 EK=K(1)+K(2)+K(3)+K(4)+K(5)+K(6) 

929 ET=T(1)+T(2)+T(3)+T(4)+T(5)+T(6) 

939 IFPL=10RPL= 40RPL=70RPL= 190RPL= 120RPL 


=150RPL= 1 8THEN990 

949 IFPL=20RPL=90RPL= 1 40RPL= 19THEN19699 
959 IFPL=60RPL=130RPL= 17THEN1919 

969 IFPL=30RPL=80RPL= 1 1THEN1 0929 

979 IFPL=50RPL=16THEN1930 

989 IFPL=29THEN1949 


1239 PSET(IX16-1.57).2:PSET(Ix16-1.52) ,2 
:PSET(Ix16-1,47) ,.2 
1249 PSET(IX16-1.127),2:PSET(Ix16-1 、122) 


>2:PSET(IX16-1、117),2 

1259 NEXT 1 

1269 GOTO 339 

1279 REM--ーーーーーーー ザーー ム な ・ オ ニハ ドー- エニ ニニ ニニ ーー ニニ 
1289 PLAY"S9M6999F8F8F8F8F8F8G+8G+8G8F8E" 

8F" 

1299 LOCATE19.9:COLOR4:PRINT "の の $⑲ GAME 0 

VER @@ ぐ 9" 

1399 TALK "F ^+GE'I MU'/ 0'-BA-.“" 

1319 FORI=9 TO 2999 

1329 NEXT I 

1339 GOTO 1429 

1349 SCREEN 4.4.4:CLS 

1359 LOCATE11.6:COLOR4:PRINT"YOU GET A V 
ICTORY !!" 

1369 LOCATE13.8:COLOR4:PRINT "CONGRATULAT 
ION !!『 

1379 FORI=1 TO 6 

1389 PLAY"S8M3999L64CABCG-G+C-G-GCBFG" 
1399 NEXT I 

1499 FORI=9 TO 2099 

1419 NEXT 1 

1429 INPUT" リフ レイ 2 。 y/Zn "に Y$ も IF 

Y$="y"ORY$="n "THEN1440 

1439 GOTO 1429 

1449 IF Y$="n" THEN END 

1459 GOTO 19 

1469 DATA 11. 1。 4.-- THE ROULETTE -- 
1479 DATA 9。 4,。 2, モ 、 ト "コカ テ ~ ルー レッ トカ ~ 

ル 。 

1489 DATA 5。 8。 2 コル 、 ヤ ツラ サヤ セテ ヤル 。 
タ ~ レ カッ テ ? 


1499 DATA 5 4 。 2, モチ ロン 、 ヤツ サ 。 アノ 、 ニ ッ ク 1689 DATA 
キ オー ナ - サ 11 2 822 。 
1599 DATA 6 。 ト 、 カ シン“ ノ へ リコ ンタ 1699 DATA 
ウ 2 カバ 4 。 38, 49, 
1519 DATA 35, ,・ う 30 。 * 935。788。 195。 1799 DATA 
5,。 91.259, 35, 1 1 9, 34。 54。 
1529 DATA 945, 」 5 1 1719 DATA 
9.154.225,139 、 と 4 54, 37。 
1539 DATA 199, 1 っ 1 。 1 1729 DATA 
6.215, 58,243, 。 1 5, 49。 75。 
1549 DATA 39。 Y 1 R 31 1739 DATA 
1、 74.263, 88 。 1 4。 87。 49, 
1559 DATA 311, 126, 263,112.294.152.255, 1749 DATA 
128.272.179.243.134.243.181,229 9, 49。 92。 
1569 DATA 142, ・184.215.143.187,181,29 1759 DATA 
1.142.158.179, 、134,.136,.152 4。 11.194, 


40, 


1579 DATA 175、 119.126.167.112.116.19 1769 DATA 197, 
9.164.199,119, 167, 88.136 1.119, 22,104。 
1589 DATA 48, ,。 73.158。 39.187, 66,18 1779 DATA 27,.198,。 27,194,。 27.119,。 43,.19 


7 19.201 , 1 . 89.215, 92 4 。 38。1094, 


36, 


1599 DATA ,223。199.215.129.215,16 1789 DATA 119, 
8.195,109, 1 1 3,197。 38.197。 59.194, 54.194 
1699 DATA 3 5 6 。 96, 32。 9 1799 DATA 54.194, 54.119,。 54.119, 59,11 


6 62。 96。 有 1 っ 6 9, 59,。119, 


59, 


6.107。 
22 。198, 


194, 38,119, 38 
43。119, 43,.119,。 43.197。 4 


194。 54,197, 59 


1619 DATA RB RB > 16。 62。 32。 3 1899 DATA 197, 69.194、 69,119, 71,.194, 7 
2, 32。 62。 1 1 1.119,。 71、119, 
1629 DATA 6 る 5 。 89。 5 1819 DATA 75,.194, 75.194。 71.194, 84,19 


9, 42。 96・ > 1 1 。 4 87,104, 


87, 


1639 DATA る 1 。 57。 『 1829 DATA 119。 
7、 9,192, 192, 9.194, 89.119。 89,119, 92,.119 


1649 DATA 。 96,132。 9,、132。 1839 DATA 
9.192,。 16, 。 16。132。 32。192 4 


92。 


1659 DATA ,132。 48,192。 48。 1 1849 DATA 229。 
2。 64.132。 192,。 89,132。 9 9.398。 79,319.195.395,126 

1669 DATA 。 96,112。 9,117, 1859 DATA 289.147,.265,164.249.189.214,.18 
9.122。 96, ,。 99.127。 96,127 3,185.177,.158,168,136,.159.125 

1679 DATA ,。 34。 11。 34。 11。 5 1869 DATA 122.123, 96,121。 74.149, 48,16 


7。 111 。 377 。 37。 6. 37。 6 3, 39,189。 


一 変数 リス ト 合計 
PR…… プ レー ヤー の 人 数 ・ SK…… プ レー ヤー 1 の 配当 
D$…… メ ツ セ ー ジ ・ ST…… プ レー ヤー ク 2 の 配当 


X…… ボ ー ル の 初期 X 座 標 ・ 較 プロ グラ ム の 説明 

Y……| ボ ポール の 初期 Y 座 標 ・ 10 130 タイ トル 画面 

PK…… プ レー ヤー 1 の 持ち 金 : 140- 320 メイ ン 画 面 

PT…… プ レー ヤー ク 2 の の 持ち 金 ・ 330- 510 プレ ー ヤ ー 1 入力 

〇 OW…… オ ー ナ ー の 持ち 金 ・ 520- 720 プレ ー ヤ ー2 入 力 

K( )…… プ レー ヤー1 の ガ け 金 : 730 一 810 ボー ル 回 転 

T( )…… プ レー ヤー2 の ガ け ば 金 ・ 820-1260 判定 ・ 処 理 

EK …… プ レー ヤー 1 の ガ け 金 : 1270-1410 ゲー ハム オー パー 
合計 ・ 1420-1450 リプ レー 

ET …… プ レー ヤー ク 2 の が ガ け 金 : 1460-1520 マイ トル 画面 デー 


29 


75,119, 75,116 


194, 87,119, 87 
84.119, 87.197。 84,.197。 8 


119, 92.194、 92.194, 89,19 
29,245, 22.272。 33.294。 5 


マ 

1530 て 1940 メイ ン 画 面 デ ー タ 
1950 一 2050 ボー ル 回 転 デ ー タ 
田 チ ェ ッ クボ ポイ ント 

デー 文 が ザ 、 け つこ う 長 い の 
で 、 打 ちこ お とき は 、 注 意 し て 
くだ さい 。 ま だ た だ 、 か ガ け 金 入力 時 
に キー パッ ファ に デー タ が だ ま ・: 
つて し まい 次 の ゲー ム の と き に 、: 
か っ て に 入力 され て し まい ます 。 ・ 
そこ で 、331 行 , 521 行 に E X 
CS&H1058 を 入れ て こ だ さ 
い 。 


1879 DATA 

4。 34。 4。 

1889 DATA 

1。 6。 36。 

1899 DATA 

人 ン 

1999 DATA 

7 は 8 上 よ 

1919 DATA 

6, 19, 4, 

1929 DATA 4 , 

3,THE ROULETTE 

1939 DATA 9 7, 。PLAYER 1, 
4。 $。 7。 15。 4。 

1949 DATA 9。 14。 ,PLAYER 2, 
3。 OWNER $ 

1959 DATA 9*。 攻 5 。 19。 9 
9, 9, 18, 3,799 

1969 DATA 28, 4.39。 5.32。 6,34。 
34.19.34、12.32.13.39,14.28、15 
1979 DATA 25,.15.23.14.21.13.19, 
19, 9,19,。 7.21。 6.23。 5,25, 4 
1989 DATA 28, 4.39、 5.32。 6,34。 
34.19.34.12.32.13.39,14.28.15 
1999 DATA 25.15.23.14.21.13,19。 
19, 9.19, 7.21。 6.23, 5.25, 4 
2999 DATA 28, 4.39、 5,.32、 6.34。 
34,19.34.12.32.13.39,14.28.15 
2919 DATA 25.15.23.14.21.13,19、 
19。 9.19,。 7.21。 6.23。 5.25, 4 
2929 DATA 28, 4.39、 5、32、 6.,34。, 
34.19.34、12.32.13.39.14.28.15 
2939 DATA 25.15,.23.14、21、13.19。 
19, 9.19, 7.21, 6.23, 5.25。 4 
2949 DATA 28、 4.39。 5.32。 6.34, 
34.19.34、12.32.13.39,14.28、1 
2959 DATA 25.15.23.14.21.13,19. 
19, 9,19。 7.21。 6.23。 5.25. 4 


まだ 、 の 人 で プレ イ す る と き 、 
33 グ 2 FOR 1=1TO 
6:K(1) = の :NEXTI 
3 う 331F PK〈(= の 1「HE 
NG 

ら 22 FORT 三 1106:1 
([ ) デ の :NEXT1 

ら 必 9 【F 所 [の 1 
HEN/Z20 

区 光る ある 入 の 0 ルー ツー デ 
が 持ち 金 0 以下 に な る と 、 そ の 
プレ ー ヤ ー は 、 上 自動 8J に キー 和信 
力 で き な ぐ な り ま す 。( エ イキ チ ) 


19 DIMZ(5):X(3)=1:X(7)=-1:Y(1)=-1:Y(5)=1 
・GOTO369 

20 M=X:N=Y:E=E-1:PLAY"t199S3m2999o6c24" 
39 T=STICK(9):T=(T=4):J=(E>199 ) 

49 IFIXJ=1THENLOCATEX。Y+1:PRINT" "の 5:POKE 
&HE999+X+(Y+]1 )x32.&H4F:E=E- 199 

S9 X=X+X(T):Y1=Y+Y(T):Y=Y1+Y(T) 

69 X=X-(X=-1 )%32+(X=32 ) 32:Y=Y-(Y=-1 ) 2 
79 P=PEEK(&HE299+X+Y1x32 ) 

89 IFP=&HDBTHENX=M: Y=N 

99 IFP=255THENE=E+ 1 099 

199 IFP=191THENG=G+1 

119 LOCATE26.15:PRINT" ">・LOCATE26 15 
・PRINTE: 

129 POKE&HE299+NX32+M,32:POKE&HE999+Nx32 
+M,&H4F:LOCATEX YEPRINT" 火 ": 

139 IFV=XANDW=YTHEN299 

149 FORA=9TOG 

159 Vl=V:Wl=W:W=W+SGN( Y-W ) 

169 Pl=PEEK( &HE299+V+WxX32):W=W+SGN( Y-W) 
179 IFP1=&HDBTHENW=W1 

189 V=V+Z:V=V-(V=-1 ) \32+(V=32)x32:IFW く >W 
1THENV=V1 

199 P=PEEK(&HE299+V+Wx32 ) :IFP=&HDBTHENV= 
V1 : ア ニノ + (=ー1 )※-2+(Z=1 ) x2 

299 POKE&HE999+V1+W1x32.96:LOCATEV 。W:COL 
OR3:PRINT"@"::COLOR69 

219 IFV=XANDW=YTHEN269 


220 IFE く 1THEN269 
239 NEXT 

249 IFY=13THEN519 
259 GOTO29 


269 PLAY"t209S3m2999C64d64C16cC64d64e4" 
279 LOCATE11.7:COLOR2EPRINT"GAME OVER": 
289 LOCATE19.9:PRINT "REPLAY  Y<>N"i 

299 IFE く 1THENLOCATE8 , 11:PRINT "エネ ルキ ~ー か ~ 
9 に な っ な "5PLAY"t299S3m2999C4d64" 

399 COLOR9: IFS>HITHENHI =S 

319 LOCATE5,15:PRINTHI: 

329 A$=INKEY$: IFA$ も =" "THEN329 

339 IFA$="n "THENSCREEN1 , 1 , 1 :CLS: END 

349 IFA$="y"THENSCREEN2 , 2 .2:CLS:GOTO489 


359 GOTO329 


369 SCREEN2 2.2:COLOR1 ,9,1:CONSOLE9 ,16,9 
9:CLS:HI=9:Q=57921:J=63 

379 FORA=9TO66: IFJ=319THENJ=63 

389 READU:IFU=64THENJ=J+64:GOTO4099 

399 Q=Q+U:POKEQ,J:PLAY"t299S3m1999f64" 


499 NEXT ei 
419 LOCATE19.7:PRINT"< 火 > ・・・・ あな た " 続 次 リ 
429 LOCATE19,.9:PRINT" く <@> ・・・・ エイ ラー" く ベス 
439 LOCATE7 , 11 :PRINT "メン スゥ か "も け ~ ん 0 ケーー ム て ~ す 。 上 
9 e ツン 
449 LOCATE7 ,13:PRINT"HIT SPACE スタ ー ト M 


"5・PLAY"V19o3f 24" 


9 他 る @ 


9 


ト - 


Oo 


さき へ と お ん ヤ 


We * 
交 ぶ きら 巡 み き (4 


NG 


* ヽ N パ て 


で ここ 
NN の ルー Oo 


ーー、 


に 


一覧 2 
wt 
に i ロ 


( 


rr この 


ィ 【( 


光 ざ すい 記 デー くさ と 0 ロロ テー す Y ざ ・ ビ 〇 > 


っ 9r の 7 て SE ゆ 


1 1 


ーー 


459 LOCATE7。13:PRINT" 


469 IFSTRIG(9)=1THENCLS: GOT0489 


479 GOTO0449 


489 CONSOLE9,15.9.9:X=16:Y=13:V=31:W=13: 


S=9:E=199:G=9:Z=-ー1 


499 LOCATE9 、15:PRINT "ルイス コア 


エネ ルキ “ーー 199 "> 


スコ ア 9 


599 LOCATE5、15:PRINTHIi:GOTO529 
519 S=S+199:LOCATE15.15:PRINTSi:G=G+9 .5 


S29 FORA1=9TO5 
539 FORA=9TO4 


S549 F=58272+(INT(RND( 1 )x28)+2) 


S59 IFF=ZZTHEN549 


S69 IFF=Z(9)+10RF=Z(9)-1THEN549 
o79 IFF=Z(9)0RF=Z(1)THEN549 


589 Z(A)=F 
599 NEXT 


699 K=Z(4)-58272:ZZ= ェ (4 ) 
619 LOCATE9 14:PRINT "HHHHHHHHHHHUHHHHHHUHIH 


HHHHHHHHHHHHH" : 


629 PLAY"t199S7m1999o8cC16916" 
639 POKEZ(@ ) ,32:POKEZ( 1 ) , 32 


一 変数 リス ト 

X.Y お aaa * 凡 7 の 座標 

MIN…… 火 "の ダミ ー 座 標 

X( ).Y( )… 炎 7 の 方 向 決定 

E…… 火 "の エネ ルギー 重 

V,W…… エ イラ ー の 座標 

V1.W1 …… そ の ダミ ー の 座標 

の …… エ イラ ー の 移動 方 向 

G…… ご "次 " が 1 回 物 動 す る あい 
だ に エイ ラー が 何 回 移動 
する ガ 

T……STICK 関 数 用 

P……V-RAM PEEK^ 火 "用 

P1……V-RAM PEEK エ イ 


R3:S=9:J=1 


"* BLSE 609 


> ELSE 39 


119 IF X=<65 THEN 


+199:GOTO299 


・ J…… 穴 を 掘る とき の エネ ル ギ 


Op ジ 22 


・F、ZZ、Z( )、K-… 画面 作成 用 
・ U.JJO…… デ モ 時 の マイ トル 


グラ フィ ッ ン 作成 
用 
・ 較 プロ グラ ム の 説明 
・ 10 初期 設定 1 
20 メイ ン ル ー チ ン 初 其 
設定 


・ 30-130 キー 入力 い 火 / の 秘 動 
・ 140-230 エイ ラー の 移動 ・ 


19 RANDOMIZETIME:H=299:DIM D(5) :G$="By Y 
・YAMAMOTO" EGOSUB298 
<9 CLS:COLOR7、9:WIDTH89 、25:GOSUB359 : COLO 


30 X=9:Y=12:YA=9:Q=1:B=9: し =INT(RNDx25)+1 
・A=L+49:TF A=>75 THEN 3 
49 B=B+1: IF B=<A THEN LOCATEB,23:PRINT "= 


59 IF JNKEY$=" "THEN GOSUB429 :GOTO89 EL 
69 B=B-1:IF B=>9 THEN LOCATEB , 23:PRINT" 


79 IF INKEY$=" "THEN GOSUB429 ELSE 69 
99 IF Y=22 THEN Q=-1 ELSE IF Y=9 THEN Q= 


39 IF INKEY$=CHR$(13)THEN Y1=Y:GOTO199 E 
LSE Y=Y+Q:GOSUB439:GOSUB429: GOTO89 

199 IF B=>X THEN IF Y=<21.5 THEN GOSUB42 
9・X=X+]1 :GOSUB429:GOTO199 ELSE279ELSE119 
IF Y=<21.5 THEN GOSUB4 
2Z り :X=X+1:YA=YA+1:Y=(YA/19)^2+Y1 :GOSUB426 
:GOTO119 ELSE 279 ELSE 129. 

120 Y2=ABS(Y-12):D(J) =Yx8:T=J:IFY2= く 1 . 9T 
HEN SYMBOL(9、199 ) , "SCORE: 199",6,19,2:S=S 


139 IF Y2=<3.7 THEN CL=3:SC=89:GOTO 189 
149 IF Y2=<5.7 THEN CL=4:SC=59:GOTO 186 
159 IF Y2=<7.6 THEN CL=5:SC=39:GOTO 186 
169 IF Y2=<9.5 THEN CL=6:SC=29:GOTO 1886 
179 IF Y2= く 11.4 THEN CL=7:SC=10 


・ 240-250 メイ ン ル ー チ ン あ と 


・ 260~-350 ゲー ム オ ー バ ー 処 理 
・ 360 初期 設定 2 

* 970c470 . オ ー ア ニン デモ 
・ 480 初期 設定 

・ 490-510 画面 作成 1 

・ 520-680 画面 作成 の ( ス フ ロ 


・ 690-750 マイ トル 表示 用 デー 
マ ・ れ で は と れ な いよ 。 目 Eh みた い 
圏 チ ェ ッ クボ ポイ ント 

この ゲー ム を 、PC-6001mk 
II、PC-6601 で 走ら せる と 、 


649 POKEZ(9)-512.&H4F:POKEZ( 1 ) -512,&8H4F 
659 LOCATE9 , 14:PRINT:POKEZ( 2 ) , 255 :POKEZ ( 
3),191:LOCATEK,13:PRINT "HH" i 

669 Y=Y+(Y く >1 )x2:W=W+(W く >1 ) 2 

679 NEXT 

689 GOTO29 

B90 DATA9、】 、] 1 。-33.32 .32.32、31 ..64 

7909 DATA-122.31 ,31 .31 ,-39 ,32,.32,64 

71 り DATA=125。1 ,1 、32.31 3 ,31 ,-29.32.,64 

が の DRTAーL25、 391 8901 32 981。81.。8TL お 4 

は 本 DAEA129、02、32 92.92 =-197、1 1、32、32。 
32 。39 1 ,1.64 

749 DATA-62,1,1.64 

の UNATA-62.32..92、d2.91 、-125 32.32.32、32 
を は 


し まつ 


ー ル させ て 面 を 作る ) : T\ 
・ だ 各 フ ロア ー の 穴 の 部 分 は 、 こ 


・ で いい ん じゃ な いか な 。 
・ (だ だ と る の が めん どい フク フー) 


189 !I=I-1:IF I= の 9 THEN 199 ELSE IF Yx8=D( 
1) THEN GOSUB 429:GOTO 199:ELSE GOTO189 

199 B$=STR$(SC) : B$=RIGHT$(B$,LEN( B$) - 1 ) : 
SYMBOL(9.199) "SCORE:"+B$,7,19.CL:S=S+SC 
<99 FOR T=9 TO 4999:NEXT:LINE(9,199)-(56 
8、189) ,PSET.9.BF:LINE(9,182)-(529,199), 
PSET,.9.BF:IF Js=5 THIN 219 ELSE J=J+1:GOT 
0 39 

219 WIDTH49:COLOR7:IF H=<S THEN H=S: BEEP 
LOUCATEZ 22PRTINI "HI1-SCORE) 37237> く INPUT" 
NAME- " ,G$:G も =LEFT も (GS$ 、 13 ) 

220 SYMBOLISO。50)、"H1 Segre",.5。7、21SYMBO 
EE 2 ON SGGPe 「 呈 、 ア 。 ク 

<39 SYMBOL(380 ,120 ) ,STR$(S) 、5,7、7:SYMBOL 
C380.50) STRS(H)、5.7。7 

249 SYMBOL(59.195) ,、"NAME" .2.2.6:SYMBOLL( 1 
OO 。 105) と G あ も 。 2 2 。4 

259 LOCATE5,22:COLOR5:PRINT "Try Again (Y 
/N)":P$=INPUT も (1 ) 

<60 【F PS="N" OR PS="n" THEN END ELSE IF 
P$="Y” OR P$="y" THEN 29 ELSE 250 

279 GOSUB4290:X=X+1:TF X>65 THEN 289 ELSE 
GOSUB429:GOTO270 

<89 GOSUB 429:GOTO 129 

299 GOSUB359 : SYMBOL( 9 9 ) "ター リサ バッ ト ・ サ ドーム "5 
5S5:SYMBOL( 1、1) 、 リ ター サド ッ ト ・ リ ドー ム " 5.5。6 

399 SYMBOL(9.89)、"--$@"、2.3、5:SYMBOL(89,8 
0 ター トド 297 

319 SYMBOL(9,129) 、" こ ここ 、2.3,.3:SYMBOL.( 8 。 
1 符 人 は あ 。 衝 00、2 0 


~ 火 "の 動い を あと に ド ツ ト が 門 
る ん だ 。 重松 さん が 6001 を 使 つ 
て 作 つ だ ゲー ム だ か ら な ん だ け 
ど ご 、 ち よ つ と 気 に な る ね 。 6001 
mKII 6601 ユ ー ザ ー の 人 は 40 
行 の POKE 文 を と り 、120 行 の 
つの POKE 文 の か わり に 、 し 
OCATE ML N:PRIN 
” を いれ て みて ぐれ 。 だ 


x な お 画面 写真 は mKII で 撮影 。 


320 SYMBOL(0、160) 。 ド EY ニ ーーー 3 3 91SVMBOL( 
179,169), "SPACE & RET"、3,3.6 
339 SYMBOL(199.59) ,G$ も 、3.2.2:SYMBOL(169,1 


389 PAINT(555.199).2.2:PAINT(571.190 ) .+4, 
4.3:PAINT(591 .199).6,6,5 
399 SYMBOL(544.16)、"19"、1.1.7:SYMBOILL(544 


6 は 2 りー。 よ 1 

499 SYMBOL(544.48) 、"39".1 1 ,7:SYMBOLL(C544 
64)、"59"、1.1.0 

419 SYMBOL(544.89)."89".1.1.7:SYMBOL(536 
96)。"199" 1。1.7:RETURN 

420 SYMBOL(XN8、YX8) "ニー を "1 .1 5。,.XOR: RET 
URN 

439 SYMBOL(Xx8,(Y-Q)x8)、"-ー-@" 1.1.5.、XOR 
・RETURN 


99) , "HIT RETURN KEY",3、3、4 

349 A$=INKEY$S:IF A$="N" OR AS="n" THEN 
ND ELSE IFA$=CHR$(13)THENRETURN ELSE339 
359 CLS:COLOR7 .9:WIDTH89.25:C=9:FOR 「=0 
JO 7/0 SE 10 し = し ゃ ) 

369 CIRCLE(559、199),I、C、1.5:NEXT 
CS 100).69、7 、1 5,、9 き 。。1『 

379 LINE(559.19)-(692、19) 、PSET:LINE(SS9, 
199)-(692.199) ,PSET:PAINT(639.199) 5.Z 


3 で LRCL 


画 変 数 リス ト ・ XY……:Xy 座 標 ・ BS…… シ ン ボ ル 表 示 に 利用  : ルス コア 表示 
H…… ハ イス コア ・ YAY1……y 座 標 増加 に 利用 : T…… ル ー プ ・ 200-260 再 ゲ ー ム 
D( )……Y 只 標記 模 用 ・ 〇 …… 矢 の 高 さ の 増分 ・ 田 プ ログ ラム の 説明 ・ 290-340 タイ トル デモ 
G$…… ハ イス コア ラー の 名 前 : B:…… 矢 の 強 さ の フラ ブ ・ 10 一 20 初期 設定 ・ 9350 一 410 的 の 表示 
C…… 的 の 色 ・ し …… 矢 の 強 さ ・ 30~ 70 矢 の 強 さ 設定 ・ 420-430 矢 の 表示 
|…: 的 の 半径 ・ A…… 矢 の 強 さ の 表示 用 ・ 80-- 90 矢 の 高 さ 設定 

AS.P$…… キ ー 入 力 用 ・ Y の …… 得 点 判定 用 :・ 100~110.270-280 矢 を 飛ば す : Yen 
S…… ト ー タ ルス コア ・ CL…… シ ン ボ ルカ ラー ・ 120-200 スコ ア 判 定 、 表 示 : へ へ 
J…: 矢 を 飛 げ だ 回 数 ・ SC…… ス コア ・ 210-240 ハイ スコ ア 、 ト ー タ : 


19 "HHHUHHHHHLIHHHHUHHHLHHHHLHHHHIHHHHHIHHHUHHUHHH 
日 


/ 。 \ 7 ュ 

29 "HH DIGSON FIELD H 
H の 1? 1 PROGRAMED 

3 "HH - CABBAGE PATCH FIGURES - H 
H な BY 

49 "HHHHHHHHHHHHHHHHHHHHHHHHHHHHHHUHUHHHHH 
= ⑯ 一 @ WATA BOU 

5 ニニ ニニ ニニ ニニ ニニ ニニ ニニ タダ イト 肌 ニ ニニ ニニ ニニ ニニ ニニ ニニ ニ 


69 CLS:WIDTH49.25:RANDOMIZE(TIME ):DEFINT 
A-Z:HC=2099:DIM G(35 ) 

* 居 お 1NEOCD、 0) こ (039.11)。 "0 4 .BP 

89 SYMBOL(35.20) 、"DIGSON FIELD"、6.8.6、、X 

OR 

39 SYMBOL(37 、22 ) 、"DIGSON 

OR 

199 COLOR3:LOCATE8 12:PRINT "<<CABBAGE PA 
TCH FIGURES>>" 

は し LLNEMM で 0、 す 9) っ (939 20) UMU'、 も BCOLOR5 
129 LOCATE 28.24:PRINT"By WATA BOU"・ 

139 LOCATE 2。16:PRINT" アナ タ ココ < く DIGSON 
FE も EED2 / ナク 

149 LOCATE 2.18:PRINT" 
が が 022 な 2 

159 LOCATE 2.20:PRINT " トウ クツ ウマ ク DJ ココ ッ 
テー クタ “サイ 。 "EEFORH=9 TO200999:NEXT :COLOR3 
8 し INEW(1。14)-(98、22)。" "7、BE 

179 LOCATE 6,.16:PRINT" 1] 

131":COLOR5 

189 LOCATE 6.18:PRINT" 
199 LOCAIE 6、202PRINT" 


に LELD 6 8 NO 


カツ リル レタ 5 ツノ メ ウ シッ ” ブ ネ 


D19 upP 【[A]" 
PLGK UB LSPA 


CE1":COLOR2 

299 LOCATE13.23:PRINT" HIT ANY KEY " 
210 IF INKEY$="" THEN 219 

2 "ニニ ニニ ニニ ニニ ニニ ニニ シヨ キキ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ 


239 TY=3:UY=8:SC=9:LEFT=3:SCR=1:0L= 1 

249 CLS:X=29:TMY=9:UMY=9:TF SCR>4 THEN T 
1=799 ELSE TI=1999 

259 U=9:UM=9:TM=9:T=9:AX=9:TX=5:UX=35: [= 
1 


269 T$(1)= リ ーー イイ "ET ま (2)= リ ーー ナナ":U も ( 1) =" ェ エエ 
本 さめ うに 32 

279 FOR W=1 TO 35:G(W)=9:NEXT 

289 TY=TY+2EUY=UY+1:IF TY>12 THEN TY=4:U 

まで 9 

299 FOR W=1 TO _ 5:C(W)=INT(RND( 1 ) x9+ 1 ) :FO 

R WWw=9 TO _W-1 


399 


IF C(W) く C(WW ) 
NEXT WW:GOTO 320 


THEN SWAP_ C(W)、C(WW) 


319 IF C(W)=C(WW) THEN 
W ELSE NEXT WW 

329 NEXT W 

339 FOR W=1 TO 5 

349 D=INT(RND(1)x28+5):IF G(D)=9 THEN G( 
D)=C(W):NEXT W ELSE 349 

35 全 "ニニ ミニ ミニ ニニ ニニ ニニ ニニ 力 ^ メン ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ 
369 COLOR 6:LOCATE 9.9:PRINT "HHHHHHHHH C 
ABBAGE PATCH FIGURES HHHHHHUH" 

937 LINEQOC(B 2) こ (39.2 ) 、" 三 “5 
LINEQO(9.29)-(39.24)、" 還 "、6.BF:COILOR 3 
LOCATE 36,.16:PRINT "HHH" 

LOCATE 36,.17:PRINT "HHHH" 

LOCATE 36.18:PRINT "HHHIH" 

LUNAIR 6.193PRTINT ISGMLUOIR 7 
LOCATE 3、1:PRINTUSING"SCORE 拉 失 人 "5 


WWEWiWEW-1:NEXT _W 


LOCATE 28、1:PRINTUSING "TOP 本 壮 寺 持 持 "・H(C 
LOCATE15.24:PRINTUSING"ROUND  # 村 " 1SC 


LOCATE 2.24:PRINTUSING"LEFT #":LEFT - 
LOCATE 39.24:PRINTUSING"TIME 本 #")T 


Ne 2 22: 二 で 


A$=INKEY$ 

IF A$="1" THEN 
IF X< く 3 THEN X=3 
IF X>34 THEN X=34 

IF A$S="3" THEN X=X+] 

て IF A$=" "| AND SCREEN(X+1.29) く 100 
AX=9 THEN AX=G(X+1):COLOR 4:LOCATE 
29:PRINT"T9":G(X+1 ) = 

SS り IF A$= "AV AND AX=9 AND X<33 THEN 

CREEN(X+] 。20) :P=P-] ELSE 590 

S69 IF P=127 THEN COLOR 4:LOCATE X+1.20: 

PRINTUSING" 拉 "1G(X+1 ) 

S79 [IF P= く 127THEN 590 

S589 COLOR 6:LOCATE X+1.29:PRINT CHR$(P) 


=XX- 1 


AND 
X+ ] 。 


PsS 


59 り 9 IF X=35_ AND AX く <>9 THEN 699 ELSE 660 
699 IF _ AX く <>C(T) THEN 649 ELSE AX=9:COLOR 
2: LOCATE 37、19:PRINTUSING" "に C( 二 ) 


619 SC=SC+INT(TI/19)x]:[=I+1:COLOR 7:1L0C 
ATE 3.1:PRINTUSING"SCORE 杜 持 "15C 


1) 


<hV 


る 


き 


w 


\ ヽ 
プー ハー 
) 


ぐ ヽ 苦 説 貴 能 由 テ ー キ VN 避 ・ ビ の > 


w 
ン 


コン ご ヤミ 
キヤ SH N マ > 


> マジ 
ン o で ヾ 


デマ 人 す 立 
が る あび 江 


@ 
の 
ト 】 


9 人 F 


9 
es 
上 


629 IF 1I<6 THEN 669 ELSE BEEP1:COLOR 2:L 


OCGATE 15。155PRINTG00D 1" B 909 


639 FORH=9TO2099:NEXT: BEEP9 :FORH=9TO4909 
:NEXT:SC=SC+SCRxTTI:SCR=SCR+ 1:GOTO 249 
649 D=INT(RND( 1 )x28+5) 

659 IF G(D)=9 THEN COLOR 6:LOCATED.29:PR 
INT"" に :G(D)=AX: AX=W 


る 
V 活 


ING" 韻 半 "STI・ 


19 REM > く > く > くう くう くう > く > く > く うく ウ 2 く ウ > くう 2 くう くう くう くう くう > 
く > く > うく > くう > くく うく うく うく うく うく うく うく うく 


29 REM < く > 
く > 
39 REM >< BUG PAN1C For ド 
M-7 By 99647 > く 
49 REM < く > 
く > 


59 REM > く > く > くう くう > くう くう くう くう くう くう くう くう くう くう くう くう 
く >2 く > く 2 く > くく うく うく > くう く ウ > く ラウ く > く うく 

DU) “ニニ ーー ニニ ニニ ーー ニー マニ マー ニー ピー デニ テー INITIALIZE 

79 COLOR7.9:WIDTH89 .25:RANDOMIZETIME:DEF 
INTA-Z:DIMS%(14、11) 、SP%(14、11) 

89 DIMP%(95 ) .B%(95) ,T%(95) ,POX(31) .D%(95 
) , BL%(31 ) ,E%(95 ) ,.R%(95 ) ,H%(5 ) 

99 FORI=1TO5:H%(I)=5999:NEXT:ONERRORGOTO 
1969 

199 FORI=9@TO95:READP%X(I):NEXT:FOR1=9TO95S 
・READB%(T):NEXT 

119 FORI=9TO95:READT%(1):NEXT:FORI=9TO95 
・READD%( IT):NEXT 

129 FORI=9TO031STEP2:READBL%(T):BL%(I+1)= 
BL%(I):NEXT:FORI=14TO62:READE%( 1 ):NEXT 
139 EX(81)=-24576:PO%X(12)=3:PO%(13)=-163 
84:PO%X(14)=15:PO%X(15)=-4996 

149 PO%X(16)=15:PO%(17)=-4996:PO%(18)=3:P 
0%(19)=-16384 

5 の こと ジー デコ ニコ ーー キー ニー ニー ここ TITLE 

169 PLAY"T299V1904" ."T299V703" ."T299V805 


6 タタ 


・BEEP:ELSE 640 


NT" * ぁ "ELSE PRINTUSING" ま # "AX 
679 Tl=TI-1:COLOR 7:LOCATE 35,24:PRINTUS 


829 IF TM-2= く X+1 AND TM+2=>X+ 1 THEN GOSU 


839 LOCATE TM-2.19:PRINT" "・T=9 
849 IF U=9 AND Z=1 AND UX<29 THEN UM=UX: 


UMY=UY+1:U=1 


859 IF U=1 THEN LOCATE UM,UMY:PRINT" ":U 
MY=UMY+ 1 :COLOR4 :LOCATE UM,UMY :PRINT"。" 

669 COLOR 5:LOCATE X.19:IF AX=9 THEN PRI 869 IF UMY=19 AND U=1 THEN COLOR 6:LOCAT 
E UM-2,19:PRINT" い ・"" ELOCATE UM-2,29:PR 


INT | mm 


ELSE 499 


679 IF UM-2 く <=X+1 AND UM+2>=X+1 THEN GOSU 


179 FORI=9TO7:P$=PS+"C8R8":S$=S$+"A16R16 
A16R16":NEXT 

189 PLAY"C4V8D8E8F4G8F8G8F8G8F8V19C4V8D8 
E8" 、P$ も .S$:SYMBOL(26.6) . "BUG PANIC"、8,.5,1 
199 PLAY"F4G8F8G8F8G8A8V19B4V8A8G8A8G8A8 
G8" 。、P$、S$:SYMBOL(39.8)、"BUG PANIC"、8.5.2 
209 PLAY"V19B4V8A8G8A8G8A8B805C404C405C8 
04C805C804C8" 、"V8"+P$,S$ 

219 PUT@A(149.69)-(171.75) ,P%、PSET :LOCAT 
E23.8:PRINT "ーーーーーーーー PACO" 

229 PUT@A(149.84)-(171.99),B%,PSET : LOCAT 
E23.11:PRINT"-ー-ーー-ーーーーー 抽 

239 PUTQA(149.198)-(171.123).D%、PSET : LOC 
ATE23.14:PRINT"-ーーーーーーー DYNAMITE" 

249 PUTQA(149.132)-(171.147).T%、PSET ELOC 
ATE23.17:PRINT"-ーーーーーーーー 199 point" 

259 LOCATE34.18:PRINT" (TECH .POLI . )" 

269 PUT@(149.156)-(171.171).PO%.PSET ,6: し 


O0CATE23.29:PRINT"-ーーーーーーーー 2 POint“" 
279 PUT@(1490.178)-(171.193) .BL%、PSET 、2: し 
OCATE23.23:PRINT "ーーーーーーーー BLOCK" 


289 COLOR3:LOCATE59.19:PRINT" く < くく 。 KEY >> 
"COLOR5:LOCATE55.12:PRINT"8" 

299 LOCATE53.13:PRINT"T4 + 6":LOCATE55.14 
:PRINT"5" 

399 LOCATES59.16:PRINT"DYNAMITE SET "ELOCA 
TE54.17:PRINT "SPACE BAR" 

319 COLOR2:LOCATE59.22:PRINT"HIT ANY KEY 
1" iT$=INPUT も (1):COLOR7:CLS 


689 IF TI=9 THEN 949 B 999 
」 699 IF SC>2999x0L THEN LEFT=ILEFT+ 1 : BEEP: 889 LOCATE UM-2.19:PRINT" "・U=9:GOTO 
に 6 0L=0L+1:COLOR7 :LOCATE2 24:PRINTUSING"LEF 
WT bM 
上 E=E+1:IF E=3 THEN E=1 999 BEEP1:FOR H=9 TO 399:NEXT:BEEP9:LEFT 
ー カ IF E=2 THEN 759 =LEFT - 1 
: 菊 セ TX=TX+1:COLOR3:LOCATE TX,TY:PRINT T$ 319 IF LEFT く 1 THEN 949 ELSE COLOR 7:LOCA 
「 地 ツ ・SWAP 征 欠 ( 1 ) ,T$(2) TE 2.24:PRINTUSING"LEFT #":LEFT-1: 
真 ト IF TX233 THEN LOCATE TX、TYIPRINT" 929 RETURN 
ーー ・TX=2 
1 UX=UX-1:COLOR4 :LOCATE UX,UY:PRINT U$ 
大 の ・SWAP US$( 1 ) ,U$(2) 949 BEEP1:COLOR 2:LOCATE 19.19:PRINT"G A 
・ 伊 IF _UX=2 THEN LOCATE UX,UY:PRINT" ME 0OV R" 
藤 北 959 COLOR 3:LOCATE 19.13:PRINT" Replay < 
5 宇 リバ クタ テン ら メ 邑 V SBEEE9 
4 。 電 789 Z=INT(RND( 1 ) x3 ) 969 IF SC>HC THEN HC=SC 
薦 ( 電 799 IF T=9 AND Z=9 AND TX<29 THEN TM=TX+ 979 IF INKEY$="S" THEN 239 ELSE 979 
・ 膝 沢 3:TMY=TY+ 1 : 穫 =1 989 4GSUN RTELUDI 31: 
トト 809 IF T=1 THEN LOCATE TM,TMY:PRINT" ":T :・ く Cabbage Patch Figures>::E:: 
人 光 MY=TMY+1:COLOR3:LOCATE TM,TMY:PRINT"。" 
山 橋 819 IF TMY=19 AND T=1 THEN COLOR 6:LOCAT 
形 爪 E TM-2.19:PRINT" に "iLOCATE TM-2.,20:PR 
ー 隆 INT" 画 = = 還 " ELSE 840 
中 
い は 上 
溶 友 古 交 数 リス ト UM.UMY…… 旭 弾 TI の 座標 ・ AS…… キ ー 入 力 用 ・ 540 Pick Up 
補 HC… ハ イス コア : 本 タイ お ・ P…… ブ レー ヤー の 下 の 判 定 : 550-580 Dig up 
山 上 G( )…… 数 字 U.T,Z…… 爆 弾 投 下 の 判 定 ・ 三 …… ト ン ボ の 物 動 判定 ・ 590-650 数 字 を 運ぶ 
厩 TX,TY…… ト ン ポ I の 座標 AX…… 拾 つ な 数 字 ・ 田 プ ログ ラム 説明 ・ 660 プレ イヤ ー の 表示 
- 城 尼 UXUY…… ト ン ボ II の 座標 | 上 … 当て だ 数 字 の 数 ・ 10- 40 REM ・ 670-680 タイ ム 処 理 
UN SC…… ス コア : TS( )US( )…… ト ン ボ の キヤ : 50-210 タイ トル ・ 690 プレ イヤ ー 増 加 
ェ 人 LEFT…… プ レイ ヤー 残り 数 : クタ ・ 220-280 初期 設定 : 700760 トン ボ の 移動 
人 SCR-… 画 面 数 ・ C( )…… 隠 され だ 数 字 ・ 290-340 数 字 を 埋め る 770880 爆 弾 
J 則 OL…… 人 数 増加 判定 用 W.WW-… 隠 す 数 字 の 設定 に : 350-470 画面 作成 ・ 890-920 弾 命中 
X…… プ レイ ヤーX 座 標 利用 _ ・ 480-880 メイ ン ル ー チ ン ・ 930-970 ゲー ム オ ー バ パー 
人 TM.TMY-… 爆 弾 1 の 座標 : D…- 数 字 を 了 開 す 位置 : 490-530 プレ イヤ ー の 物 動 : 980-1000 REM 


32 ' ---ーーーーーーーーーーーーーーーーー DISPLAY SCRE 


339 LINE(482.9)-(639.199) 、PSET,5.B:LINE( 

484.9)-(637、.199) ,PSET,5.B 

349 SYMBOL(492.6) 、"BUG",3.2.1:SYMBOIL(512 
・24)、"PANIC"、3.2、1 

359 SYMBOL(499.5) "BUG" 、3.2、3:SYMBOL(510 
・23) "PANICT 3.2.3 

369 LOCATE63.6:PRINT"X HI-SCORE *":LOCAT 

E63.19:PRINT"X SCORE *" 

379 LOCATE63.14:PRINT"x STAGE *":LOCATE6 

3.18:PRINT"x LEVEL w" 

389 PUT@A(599,175)-(531 .199 ) 、P%,PSET : PUT 

@A(565,175)-(596,199) ,D%,PSET 

399 LINE(9.9@)-(479.9) ,.PSET.4:LINE(9,199) 

-(479.199) 、PSET , 4 

4 " ーーーーーーーーーーーーーーー ニ ーー ニーー GAME_START 

419 LOCATE29.12:COLOR5 : INPUT" INPUT LEVEL 
(1-5)"iILEIFIL く 1 OR5 く IL THEN416 

429 L=INT(IL):COLOR7 :HI=H%(L) :SC=9: ST=1 : 

P=3:D=2:DF=9:C=9:BP=1:T=9:GOTO109099 

439 TX=INT(RNDx15) :TY=INT(RNDx12):IFS%(T 

X.TY)=1 THEN439 

449 PUTQA(32XTX、16xTY+4)-(32xTX+31 16xTY 

+19) 、T%,PSET 

450 PUTQA(32xX,16XY+4)-(32XX+31 16xY+19) 

・P%, PSET 

469 LOCATE73.16:PRINTUSING" 村 "ST:LOCAT 

E74.29:PRINTL 


479 LOCATE67.23:PRINTP::LOCATE76 ,.23:PRIN 

TDi:IFSC>HI THENHTI =SC 

489 LOCATE71.8:PRINTUSING" 間 持 拉 革 侍 "1H1ELOCA 

TE71.12:PRINTUSING" 析 揚 守 持 "1SC 

499 SOUND9 , 259:SOUND2、59 :SOUND4 159:SOUN 

D7 ,7 

599 XI=9:YI=9:I$=INKEY$:1FI$ も =CHR も (13) TH 

EN930 

519 IFI$=CHR$( 32) ANDD>9 ANDDF=9 THENDF= 
-1:DX=X:DY=Y:SOUND6 , 199 : SOUND8 , 5 

529 IFI$ や ="4" ANDX>9 ANDS%(X-1.Y)=9 THENX 
=-1:GOTO560 
539 IFI$="6" 
XI=1:GOTO569 
549 IFI$="8" 
[=-1:GOTO560 
559 IFI$="5" 
Yi=1 ELSE610 
569 PUTQA(32XX,16XY+4)-(32%XX+31.16xY+19) 
> RX,PSET 

579 IFDF=- 1 THENPUTQA(32XX,16XY+4)-(32xX 
+31.16XY+19) .DX.PSET :D=D- 1 :DF=5 

589 X=X+XI:Y=YTYIES%(X.Y)=2:SC=SC+2: 1FSC 
>BPx4999 THENP=P+ 1 :BP=BP+ 1 : BEEP1 :FORI = 
TO59 : NEXT : BEEP9 

599 PUTQA(32XX, 16XY+4)-(32XX+31 ,16XY+19) 
。 P% , PSET 

699 IFX=TX ANDY=TY THENBEEP1 :FORI=9TO399 
: NEXT: BEEP9 : SC=SC+98:TX=9:TY=9 

619 IFDF>9 THENDF=DF- 1 : PUTQA(32XDX 。 16xDY 
+4)-(32XDX+31.16xDY+19).D%.PSET:1FDF=9 T 
HEN839 

629 C=C+1:IF25-4%L>C THEN479 

639 XB=9:YB=9:BI=INT(RNDx13)+1:ONBI GOTO 
479.649.659.669,.679,.649.659.669,.679.649., 
659,.669,.679 

649 IFS%(BX-1.BY)=2 ANDBX>1 THENXB=- 1 : GO 

TO689 ELSE639 

659 IFS%(BX+1.BY)=2 ANDBX く 13 THENXB= 1 :GO 

TO689 ELSE639 

669 IFS%X(BX,BY-1)=2 ANDBY>1 THENYB=-1 :GO 

TO689 ELSE639 

679 IFSX(BX,BY+1)=2 ANDBY く 19 THENYB=1 EL 

SE639 

689 PUTQA(32XBX,16xBY+4)-(32XBX+31 ,、16xBY 
+19) ,R%,PSET : S%(BX , BY ) = 1 

699 BX=BX+XB:BY=BY+YB:PUTQA(32XBX ,16xBY+ 
4 )-(32XBX+31 ,16XBY+19) ,B%,PSET 

799 IFX=BX ANDY=BY THENP=P- 1:D=2:T= 1 

E479 

719 PUT@A(32XX。16XY+4)-(32%XX+31 ,16XY+19) 
,・ EX , PSET 

729 SOUND8.6:SOUND9 ,19:SOUND19 ,129:FORI= 

9TO1999 :NEXT : SOUND9 , 9 :SOUND190,9 

739 PUTQA(32XX。16xXY+4)-(32XX+31 、16XY+19) 
。B%X,、PSET : SOUND8 , 9 

749 IFP>9 THENC=9 : PUTQA(32XX、16xXY+4)-(32 

%X+31 、16XY+19) ,PX,PSET : GOTO0479 
759 GAME OVER 


ANDX く 14 ANDS%(X+1 .Y)=9 THEN 
ANDY>9 ANDS%(X,Y-1)=9 THENY 


ANDY く <11 ANDS%(X.Y+1 )=9 THEN 


ELS 


769 LOCATE67 ,23:PRINTP:SYMBOL(84.72) "GA 
ME _ OVER" ,5.3,1:HX(L) =HI 
779 FORI=9TO69:BEEP1:FORN=9TO5 : NEXT : BEEP 
9:FORM=9TO19:NEXT:NEXT 
789 SYMBOL(89.79), "GAME OVER".5.3.3:SYMB 


0L(169.199) . "SCORE "+5TR$(SC) ,.3.2.5 

799 LOCATE29.29:PRINT"Are you try again 
2 (Y/N) ": 1 も = INKEY$ 
899 IFI$="Y" ORI$="y" 
9:R=9:GOTO0339 

819 IFI$="N" ORI$="n“" 
LSE799 

829 ・ 

LOSION 

839 FORI=9TO29: SOUND6 、129:FORN=9TO30 : NEX 
T:SOUND6 , 299:FORN=9TO39:NEXT : NEXT 

849 FOREX=DX- 1TODX+1:FOREY=DY-1TODY+1 : S0 
UND9, 19 : SOUND1 9 , 12:SOUND6 , 159: SOUND8.,6 
859 PUTQA(32XEX, 16XEY+4)-(32XEX+31 、16xEY 
+19) ,E%.PSET :S%X(EX,EY ) =2:SOUND8, 4 

869 SOUND9 9:SOUND19.9:IFEX=BX ANDEY=BY 
THENC=9:SC=SC+59 


THENCLS : RESTORE1 19 
THENSOUND8 .9:END E 


DYNAMITE EXP 


879 IFEX=X ANDEY=Y THENP=P- 1:D=2:T=9:FOR 
1!=9TO8: BEEP1 :FORN=9TO5 :NEXT : BEEP9 : NEXT 
889 SOUND8,2:NEXT:NEXT:SOUND8.9:IFP=9 TH 
EN769 

899 FOREX=DX-1TODX+1:FOREY=DY- 1TODY+r 1 
909 PUT@QA(32xXEX,16xEY+4)-(32*EX+31 16*EY 
+19) ,、R%,PSET 

919 PUT@A(32XX,16xY+4)-(32XX+31 16xY+19) 
.・P%,PSET : NEXT : NEXT:GOT0479 

929 STAGE END? 
939 C=9:R=9:FORY=9TO11:FORX=9TO14:IFS%(X 
・Y)=9 THENR=R+ 1 

949 NEXT:NEXT:IFR=9 THEN970 

959 FORI=9TO59:BEEP1:FORN=9TO5 : NEXT : BEEP 
9:FORM=9TO5 : NEXT : NEXT 

969 P=P-1:D=2:DF=9:T=1:1IFP=9 THEN769 ELS 
E19099 

979 SC=SC+399+19xLwD:ST=ST+1:D=2:IFT=9 T 
HENSC=SC+ 1909 

989 T=9:FORI=9TO8:PLAY "T299L1605CD" : NEXT 
999 MAKING STAGE 
1999 LINE(9.2)-(489,197 ) ,PSET , 9 ,BF :FORY= 
9TO11:FORX=9TO1 4 

1919 IFR=9 THENREADS%(X ,Y) :SP%(X,Y )=S%(X 
>Y) ELSES%( XY) =SP%( XY ) 

1929 IFS%(X,Y)=1 THENPUTQ(32XX,16xY+4)-( 
32XX+31 、16xY+19) , BLX,PSET , 2 

1939 IFS%(X、Y)=@ THENPUT@Q(32XX、16xY+4)-( 
32%X+31 、16*XY+19) ,PO%,PSET , 6 

1949 NEXT:NEXT:IFR=9 THENREADX,Y:SX=X:SY 
=Y ELSEX=SX:Y=SY 

1959 BX=X:BY=Y:S%(X.Y)=2:GOT0439 

1969 RESTORE1199:GOTO1999 
1979 ‥ 

ATA 

1989 DATA9,9.9.9,1924.32,1924.32、1924,32 
・1924.32,.1924.32、12294.24588,12288.12.9, 
9.512.96,1924.16.16,.2948,16.2948、124.158 
72.1922,.32794,1,-32768.96.1536,1927、-163 
52,.1925,-32736 、1925,-32736 1987,-992,112 
9,1568,15558,25494.15552,.828,96,1536,575 
・-928.1925 

1999 DATA-32752、7697 ,-39669 ,3988,.2972、21 
72.15872.1922.32794.9,9.25,-26624,1924.3 
2,1939.24698.1986.31776.1216.899,14098.,41 
6.13962.24789、13956,204.384.384.794,.864, 
1986.31769、7792、26684.3988.2972.2172、158 
72 1922.32794 

1199 DATA9,9,-16384,.3,12289,-32756,3973. 
-32729.512.64,1 ,-32768.63,-1924.49,-2969 
6.7743,-994,1,-26624.63,-1924.9.3972.512 
64.3973,-32729、12289,-32756,-16384.3,.0, 
9.9.9.2,16384.62.31744.511,-128.2947,-32 
,4995,-16.8191,-8.511,-128,.8191,-8,4995, 
-16.2947 

1119 DATA-32.511,-128.62,31744.2,16384,9 
9.9.9,-16384.3,12288.12.3972.48.512,64, 
1,-32768.63,-1924.49,-29696.63,-1924,1、- 
26624.63,-1924.9,3972.512.64.3972.48,122 
88.12,-16384.,3 

1129 DATA9,9,4995、-8.4995,-8.4995,-8.499 
5,-8.16383,-8.4995,-8.16383,-8.16383,-8, 
16383,-8.16383,-8.16383,-8,16383,-8,4995 
>-8.4995,-8.9,9,9.9,12288.9,13398.16328, 
12288.29129,14334.-7296.113,-14592.12512 
3584.896,-17498.59,24899,519,-25376.56, 
7392,443 

1139 DATA7392.825,-32544.13113,-39784、12 
288.9,.9.9.9.9.4995,-8,3973,-16369,4095,- 
31298,.2948.3128.3974.6264,16143,-3848.,31 
35,594.4932.3848.3584.8456 ,4935,-7928.,35 
84.24849,3138.16136,15426,14369.16383,-8 
9.9 

1149 DATA9.9,127.9、1985,-32768,.3972,-163 
84.6145,25699,12339,-7529,24661.21849,16 


CHARACTER _D 


9、2728.337,16724.672。-24496、337 ,29820、67 . 


2,-24496.337.16669,169.2699,21,.21824.2,- 
22916.9.9.127、9.1985,-32768.3972、-16384, 
6147,-4698.12351,-2989,24831,-8.25956.49 
92,25585 


プログ? 


ポシェ ッ リ 


1159 DATA-7179、25585.-3586.-15375.-3586. 
-15375,-3586,-15887,-7364 .224.3896.63、-3 
2.3.-512.9.9.127.9.1985.-32768.3972.-163 
84.6146,-5632 12399.30916,.24746,-21848.,3 
29.1364.672,-23894.337、29829.672、-24496, 
337 .29829.169,-24924.64.1296.42.-21856.,1 
,21504 

1169 DATA9.27396.21846.27396.9,-21919、22 
191,-21919.9.27396.21846.27396.9,-21910、 
22191。-21919 

1179 DATA1,-20489.7.29489.3.29489.9.9、9, 
9.9.9,9.9.9.9.9.9.9,.512.9.9,256.12,.98,51 
2.2。-29152.39,-9216.87。-519.29527,-2976、 
2559,-16649.63.21594.2173,-16649.1999,-7 
912.17、-16384.4996、-32794.9.9.513 

1189 … STAGE PATTE 
RN DATA 


ーー 一 


っ っ 
ーーー ご ぺ 


mmー き ご ーー 


ーー 一 SSー ニ ーー ベー 一 SSー ボ ーー ニー ニー ニー ニーー ニ ーーー ベ ーー ニー・ ーーー ベ SSーGSー ベ GS ささ ーーーーー ベ ーー ご 
ーー ここ ーー ぷー SS さこ ーー ニー ニーーー ベ ーー ベベ ・- ーーーー ベ SSー ベ こさ SS ささい の き ーーー マ ーー マー 
本 っ っ っ っ っ っ っ っ ーー の っ っ = っ っ っ っ ゃ = っ っ っ っ 】 に 0 の ・< っ っ っ っ っ っ っ っ ド 】 っ ど コ っ っ っ どう っ っ ドコ っ ド 】 っ っ っ 2 ドコ っ っ 


ーーーーS こ ぷー・ こ ーーーーーーー マ ーーSS・- SS 一 SSーーーー さ ーー この SS こさ ーー 
ーーーSSー・ー ニ ーーーーーーー ニ ーーー ニー・・- ーーーー ニ ーー ニーー ニ ーーー ぷーSーーーS き 一 


・S き いい 一 一 ほこ い 一 こき ー い いき ーS の SS いら ーー マー らら ・ GS いき ーー い ーーー ウ らら ーーー 一 

SS ウー ささ ウー ミーー さ ワウ ーーー ウーS き SS の 〇 ・ に CMP0PvIGWISN CD 2 和 a0IDEROS2TN 后 の 
PIPE PS 1 
ーー コーー ニ ーー ココ ーーー ココ ここ さこ ーー ココ ーー ーー コー マーー コ ーーーー コ ーー ニーー マ ーー 一 
ーー 
1: 
ーーーーー こ ーー・ 一 ーー 一 SSーー こ SS 一 SS-・- ー ニ ーーーー ベ ーーーー マ ーー ベーーー ニ ーー ニ ーー さこ ーー ペ ーー 
人 
ーーーー ぶ ーー・- ーー ほほ ーー ここ SSーー ほ ここ ーーー-・ ーーー ニ ーー ニーー ベ ーーー マ ーーーー マ ーー マーー 
二 
ーー さこ ーーー・- ーー ニー ニー ほこ ーー ベーーー・・- ーー ニーーーSSー ニ ーーーーーSー ニ ーーー ニ ーー マーー 
本 


Tv 


較 交 数 リス ト ・ ST…… ス テー ジ : 10 一 50 REM 文 ・ 560 一 600 バ コ 表 示 と スコ ア 
S%( )…… ス フリ ー ン の 状 沢 : P……PACO の 数 ・ 60-80 初期 設定 3 加算 
お (リッ スズ デー ジリ パリ ターン ) D… ダイ ナマ イト の 数 ・ 90~140 キャ ヤラ フタ ・ デ ー : 610 ダイ ナマ イト 表示 
P( )……PACO デ ー タ 配列 ・ DF…… ダ イナ マイ ト の フラ グ : 読み 込み ・ 620 の の ツタ ー 
B( )……BUG デ ー タ 配列 。 : C……BUG ス ター トカ ウン マー: 150-310 タイ トル と テー マ : 630-670 バグ 移動 
T%( )…… テ フ ポ リ デ ー る 配列 ・ BP…… バ パコ 増加 判断 用 - ミュ ー ジ ッ ク フ ・ 680-690 バグ 表示 
PO%( )…… ポ イン ト デ ー タ 配 : 征 …… ト ライ 回 数 ・ 320-390 ハイ スコ ア 、 ス コ : 700-740 衝突 判定 と 処理 
列 ・ XY…… 画 面 作成 時 の ブロ ッ フ ・ ア な どの 表示 ・ 750~-810 ゲー ム オ ー バ パー 
D%( )…… ダ イナ マイ ト デ ー タ : 座標 、PACO の 座標 : 400-410 レベ ル 入 力 ・ 820-910 ダイ ナマ イト 爆発 
配列 ・ RR…… 残 し た ポイ ント 数 ・ 420 初期 設定 ・ 920-980 ステ ー ジ クリ ア 判 
BL )…・ プ ロック データ 配 ・ SX.SY…… 座標 書き 換え に 利 ・ 430-440 テ フ ポ リ 表 示 ・ 定 
列 用 ・ 450 パコ 表示 ・ 990-1060 ステ ー ジ 画面 表示 
E%( )…… 旭 発 デー タ 配 列 ・ BX.BY……BUG の 座標 ・ 460 ステ ー ジ 、 レ ベル  ・ 1070-1170 キヤ ラフ マタ ・ デ ー 
R%( )…… 道 デー タ 配 列 ・ TXTY…… テ フ ポ ボリ の 座標 。: 表示 タ 
H26( 日 に … ハ イス コア ・ XLYI……PACO の 移動 重 ・ 470-740 メイ ン ル ー チ ン : 1180 こ 1280 ステ ー ジ ・ デ ー タ マ 
INIM…… ル ー プ 用 ・ DX.DY…… ダイ ナマ イト の 座 ・ 470-480 ハイ スコ ア 、 ス コ : 
PSS お BPIlay 交 データ  : 標 ア 表示 5 
…… キ ー 入 力 用 : XB.YB.BI……BUG の 移動 量 : 490 サウ ンド 設定 : 242 
ILLL…… ド レベ ル ・ EX.EY…… 旭 発 の 座標 ・ 500~-550 キー 入力 と バ コ 物 : 
5 スス ・ 圧 プ ログ ラム の 説明 5 重 9 6 


62 


OLK I 、176) ,PSET .5 : NEXT 219 GOSUB259:TI=9 
:⑯ ポ ボ 59 FOR 1I=1 TO CO 229 A9@$=INPUT$(1):[F A9$="S" THEN 2 ELS 
庄 シ 69 X=INT(RNDx7)+1:Y=INT(RNDx6)+1:IF MAP( E IF A9$="E" THEN END ELSE 229 
ED ミ X、Y)=1 THEN 69 ELSE GOSUB239 239 MAP(X.Y)=1 
ツ 79 NEXT:GOSUB250:TI9=TIME 249 PUTQA(Xx48+8,Yx24+12)-(Xx48+37,Yx24+ 
板 ト 89 A1$=INKEY$: BEEP1 : BEEP9 : X9=X:Y9=Y 26 ) , MAD, XOR : RETURN 
' 99 FOR 1!=1 TO 6:IF A1$=MID$("24568 "、I,1 259 LOCATE26 ,12:PRINT"HI-SCORE":LOCATE27 
之 5 ム へ ) THEN A$=A1$ ,・13:PRINTUSING" 拓 拉 #( SGC) "日 
0 190 NEXT ' 269 LOCATE26 ,15:PRINT"TIME":LOCATE27.16: 
財 。 パ ペ 119 IF A$="5" OR A$=" " THEN 199 PRINTUSING" 半 拉 寺 寺 #(SeC) "TI:RETURN 
本 コ 129 GOSUB249 279 DATA 1536.9.6144.9,192.9,768,9,.9.0,9 
選 礎 カ 139 1F A$="2" THEN Y=Y+1:IF Y>=6 THEN Y= .511,-8192.1917,9.9.9.9.9.9.9.9.9 
2 6:A$="5" 289 DATA 16368,15,-4,224,39748.3599 、-163 
電 洋 ツ 149 IF A$=78D THEN Y=Y-1:IF Y く <=1 THEN Y= 56 ,28699,59,-16372.-16129、123,1922 
間 目 ト 1:A$="5" 299 DATA 2949,8135,-1,-28799,-32,39467,- 
巡 騰 テ 159 IF A$="4" THEN X=X-1:IF X<=1 THEN X= 1789,-28928.69.3584.969,3968.31744,1023 
こり 1:A$="5" 399 DATA 2.9,.9,9,9.9.9,1536.9,6144.9,.192 
2 央 | THEN X=X+1:TIF X>=7 THEN X= ・9.768.9.9.9,9,511、-8192、1917,9,9.0.9.9 
に 管 ド 
和 本 。 ee 
市 本 還 変 数 リス ト 用 : 80-190 キー 入力 と 太陽 移動 ・ 270-300 太陽 の プラ フィ ッ フ 
ボ MAP( )…… 画 面 上 の マス 目 ・ XY…… 太 陽 の 辱 標 ・ 200 面 ク リア 判断 キッ マン ダテ ー タ 
全 介 MAD( )…… 太 陽 の プラ フィ ツ : X0, YO0…… キ ー 入 力 時 点 の 太 ・ 210 スコ ア 表 示 田 チ ェ ッ クボ ポイント 
0 フキ ャ ヤラ クタ : 陽 の 座標 : 220 リプ レイ 判断 太陽 の 数 は 20 行 の CO=7 で 決 
漬 HI…… ハ イス コア ・ TIO …… ス ター ト 時 の タイ ム  : 230-240 太陽 表示 サブ ルー チ : め て いる か ガ ら 、 増 や し て みよ う 。 
の 丁 … 所 要 時 間 ・ 国 プ ログ ラム の 説明 ッ ン (だ けち ゃ ん ) 
性 ・ CO…- 太 陽 の 数 10-- 40 初期 画面 設定 250-260 スコ ア 表 示 サ ブル ー : 
ML AS, A0$.A1$…… キ ー 入 力 50-~ 70 太陽 の 画面 設定 ンー ・ 


ooO 


19 DEFINT A-Z:DIM MAP(7.6) ,MAD(84):FORI= 
6TO78:READ MAD(1):NEXTI:HI=199:TI=9 

20 WIDTH49.20:CO=7:A$ も ="5" ERANDOMIZE TIME 
/4:SYMBOL(169.8) , "MAD-SUN" 。2.2.3 

39 FOR I=9 TO 6:LINE(48.32+24%I)-(384,32 
+24xl ) 、PSET .5:NEXT 

40 FOR Il=9 TO 7:LINE(48+48x1,32)-(48+48※% 


179 IF POINT(24+48XX9.29+24xY9)=9 AND MA 
P(X9,Y9)=1 THEN MAP(X9.Y9)=9:CO=CO- 1 

189 IF POINT(24+48xX9.29+24xXY9)=-1 AND M 
AP(X9.Y9)=9 THEN MAP(X9.Y9)=1:CO=CO+ 1 
199 GOSUB240 

209 IF CO>9 THEN 89 ELSE TI=TIME-TI9:BEE 
P:IF HI>TI THEN HI=TI 
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19 WIDTH 89:CLS 4:CLICK OFF:KBUF ON:PALE 
T 2.3 

29 DEFINT A-Z:DEF FNU(X.Y,Z)=VAL("&H"+MI 
D$(HEX$(A(X,Y) ) ,Z,1) ) 

39 DIM Q(52),A(4.5),YAK(9,4),B(4),C(14)。 
D(14),WwINER(9),B1(4).C1(4) ,CC1(4) ,D1(4)。 
M( 4 ) 。.TM(4) ,OP(4).0Y(4) ,W(3) LU(3) ,CO(5 ) 。 
M$( 4 ) ,.N$ も (14 ) 、P$(3) , YK$(9) ,SS$(3) ,NA$(4) 
49 GOSUB 2986 

59 SCREEN: GOSUB 2999 

69 REM 回 還 間 MAIN 還 題 

79 OYA=RNDx3+1 

89 FOR F0=1 TO 9:TN=9:TM=21 

96 REM 証 還 贈 SET 回 還 較 

199 FOR !=1 TO 4:FOR T=2 TO 14 

116 TN=TN+ 1 :A$ も =HEX$( 1)+HEX も (T):Q(TN) =VAL 


("&H"+A$) 

129 NEXT:NEXT:TN= 1 

139 REM 還 証 較 シャ ッ フ ル 問題 較 

149 FOR !I=@ TO 99 

15@ Ri=RNDx51+1:R2=RNDxS51+1 

169 SwAP Q(R1),Q(R2) 

179 NEXT 

189 N=OYA:CLS3:CLS:SCREEN 9,.9,9 

196 CSIZE 2:COLOR 4:LOCATE 64.24:PRINT#9 
USING “ROUND 共 "iFOi:CSIZE:COLOR 7 


296 FOR 1I=1 TO 4 

219 COLOR 7+(TM( TI)<9)w5:LOCATE 75、Ix6-2: 
PRINT USING" も 間 共 若 " ABS(TM( 1】) ) 

229 COLOR 7:LOCATE 64,Ix6-2:PRINT _NA${} ) 


239 NEXT 

249 REPEAT:N=N+1+(N=4)w4 

259 FOR 1!=1 TO 5:A(N,1)=Q(TN) :TN=TN+ 1:NE 
XT 

269 GOSUB 1199:ON N GOSUB 1299,1299.1296 
1299 

279 UNTIL N=OYA 

289 LINE(9。Nw48-19)-(239。Nx48-47 ) ,PSET 4 
。B 
296 
399 
31 9 
326 
UE 】 
339 
349 
359 
36@ 
37@ 
389 
399 
499 


REM 証 還 且 トリ カエ r 還 還 較 

FOR KK=s1 TO 3 . 

REPEAT :N=N+1+(N=4 ) 4 

CSIZE 2:COLOR 5:LOCATE 32.Nw6-4:PRIN 
CHR$( 29) :CSIZE:COLOR 7 

ON N GOSUB 1499.1499.1499,1879 
GOSUB 1199:IF N=4 THEN GOSUB 12999 
LOCATE 32JNw6-4:PRINT " “" 

UNTIL NsOYA 

NEXT :PAUSE 29 

FOR N=1 TO 4 

YAK(FO,N)=9:GOSUB 137@ 

IF C>1 THEN 459 


6 ど と 


本 証 
+ て 


+ 電 放 区 
手 】 


理 中 ロ 


に ロロ トロ 当 に 


に デ 。 串 旨 叶 ョ デー 
ョ コ ョ hh ロ 呈 に 可 


ョ ョ LE g. 


419 
429 
439 
14) 
449 GOTO 468 

459 YAK(FO,.N)=((C>1 )*C)^2+(CC=2 ) C+(CC= 1 
)#(C-1 )%3 

469 B1(N)=B1 :C1(N) =C1:CC1(N) =CC1 :D1 (N) =D 
1:OP(N)=9:M(N)=9 


IF D=5 THEN YAK(FO,N)=4 
IF Bs5 THEN YAK(FO,N) =5 
IF B=5 AND D=5 THEN YAK(FO,N)=9+(D1 く < 


479 NEXT 

489 REM 回 還 還 BET 回 還 較 

496 HH=9:MM=9:S2=9:N=OYA 

599 REPEAT :CS=9 

519 REPEAT:N=N+1+(N=4 ) 4 

529 IF OP(N) く >9 THEN S3=1:GOTO 649 

53@ IF CS=3 AND S2=1 THEN M(N)=MM:OP(N)= 


1:GOTO 579 

549 IF M(N)=29 OR HH=3 THEN OP(N)=1:GOTO 
579 

559 R=RNDx99:ON N GOSUB 2379、2599 ,2569,2 
699 

569 OP(N)=(MM=9)x(1+(MM く M(N) ) x2 )+(MM>9 ) % 
(1+(MM く =M(N) )+(MM=M(N) ) ) 

579 S3=(OP(N)+3)/2:IF MM<M(N) THEN S3=3+ 
(MM=9 ) : MM=M( N ) 


589 HH=9:FOR !=1 TO 4 

59@ IF MM>M(I) AND OP(1!】 )=1 THEN OP(1I)=@ 
699 HH=HH-(OP(1! )=-1 ) 

619 NEXT 

629 CSIZE 2:COLOR 5:LOCATE 36,.Nx6-2:PRIN 
T#8 SS$(S3):" "iiCOLOR 7:IF M(N)>9 THEN 


PRINT# き 9 USING" 多 手 "iM(N) 


638 PLAY P$(S3):CSIZE 

649 CS=CS+1:IF S3=3 AND CS く <4 THEN CS=9:S 
2= 1 

659 UNTIL CS=s4 

669 OP=1:FOR !=1 TO 4:OP=OPxABS(OP(!)):N 
EXT 

679 UNTIL 0P=1 

689 N=OYA:MYK=- 1 :J=@9 

699 REPEAT:N=N+1+(N=4 ) x4 

799 IF OP(N)=-1 THEN 739 

719 IF MYK<YAK(FO,N) THEN MYK=YAK(FO,N) : 


W(9) =N:J=@ 

729 IF MYK=YAK(FO,N) AND W(9) く >N THEN J= 
J+1:W(J)=N 

739 UNTIL NsOYA 

749 IF J=9 THEN W=W(9@):GOTO 779 

759 D@=9:D1=9:D2=9:D3=9 

766 FOR T=9 TO J:WI=W(T):ON MYK+1 GOSUB 
1999 ,2949,2120 2239 , 2269 ,2339 , 2239 ,2230 , 
2339 , 2339:NEXT 

779 FOR N=1 TO 3:GOSUB 1299:NEXT 

789 NsOYA 


具 ・ KY1.KY2.SK…… キ ー 入 力 : 500<510 プレ イヤ ー の 表示 
VC$( )…… プレ イヤ ー や 弾 の : CO1.CO2……' 衝 突 し た スプ ・ 530~-740 キー 入力 、 各 プレ イ 
移動 万 向 ライ ト 番 号  : ヤー の 位置 に よる 娘 

ZX1.ZY1…… プ レイ ヤー1  : W-…: 勝 つっ を ほう の プレ イヤ ー : 理 

の 移動 増分 ”: AS.SP…… キャ ラフ タ 読み ご : 760-830 スプ ライ ト 衝 突 処理 
ZX2.ZY2…… プ レイ ヤー2  : み 用 ・ 850-930 ゲー ム オ ー バ ー 処 理 

の 移動 増分 ” : 左 プ ログ ラム の 説明 ・ 950-1000 スプ ライ ト デ ー タ 
EL1.EL2.… 消 すべ き ス プ  : 20~-200 スプ ライ ト 設 定 ・ 1020~1100 各 音楽 演奏 サブ ル 

ライ ト 番 号 。 ・ 220~-330 画面 作成 ー チ ン 
ES1.ES2…… 各 プレ イヤ ー  : 350420 初期 設定 

の キャ ラク  ・: 440 一 490 体力 に よる 各種 判断 、: 

変更 用 ・ 体力 表示 ・ 


799 REPEAT:N=N+1+(N=4)w4 
899 CSIZE 2:COLOR 7+(W=sN) :LOCATE 36.Nw6- 
5:PRINT#9 YK$(YAK(FO,N) )::CSIZE:COLOR 7 

819 UNTIL NsOYA 

826 FOR !=1 TO 4 

839 IF I=w THEN 889 ELSE IF (WsOYA OR 1!= 
0OYA) AND M(I)>9 THEN CSIZE 2:COLOR 7:LOC 
ATE 58,Iw6-2:PRINT##9 "x2"1:CSIZE 

849 FOR J=1 TO (1+M(I)w(1-(IEOYA)-(W=OYA 
) ) ) : TM(w) =TM(W)+1:TM( TI )=TM( TI)-1 

859 COLOR 7+(TM(I)<@)w5:LOCATE 75,Iw6-2: 
PRINT USING" も 基 "5 ABS(TM( TI ) ) 

869 COLOR 7+(TM(W) く 9)w5:LOCATE 75,Ww6-2: 
PRINT USING" も 福谷 "1 ABS(TM(W) ) 

879 BEEP:NEXT 

889 NEXT:PAUSE199:OYA=w:wINER(FO)=OYA:OY 
(OYA)=OY(OYA)+1 

89@9 NEXT FO:CLS 4:PALET 2.2:COLOR 7 
999 REM 固 還 本 TOTAL SCORE 回 還 軒 

919 CONSOLE 9@.26.9.7:PRINT "ーーーー! 


929 FOR N=1 TO 4:PRINT "ーーーー1 "5SPC(6 ) 
"1 "iLEFT も (NA$(N) 3):" 117 1SPC(6)::NEXT 
939 PRINT "レーーーー“" ji: CONSOLE 

949 FOR 』=1 TO 9:LOCATE Iw8-1.9:PRINT "て エ 
":LOCATE Iiw8-1.1:PRINT "1 "51H5 
959 FOR N=1 TO 4:LOCATE I*8-1.Nw4-2:PRIN 
T "+ オ ーーーーー" 

969 FOR T=1 TO 3:LOCATE Im8-1,Nw4-24T:PR 
INT "1173SPC(7)5 "71":NEXT 

979 CONSOLE Nw4-1.3。Ix8.7:COLOR 7+(wINER 
(I)=N) :PRINT YK$(YAK(I,N) )j:COLOR 7:CONS 
OLE : NEXT 

98 LOCATE Ix8-1.18:PRINT “ユーーーーー": NEX 


NAM 


中 

999 CONSOLE 9,.29.79,1:PRINT 

1111111 は "iCONSOLE 

1999 CSIZE 2:FOR N=1 TO 4:TM=TM(N)+OY(N) 

%19:COLOR 4:LOCATE 9@.N+19:PRINT NA$(N) :C 

OLOR 7+(TM(N)<9)w5:LOCATE 19,N+19:PRINT 間 

9 USING" 基 菩 基 "1ABS(TM(N) ) ::COLOR 7:PRINT 福 

9 USING" + 19 XX 共 = "10Y(N)i:COLOR 7+(TM 

く 9 )x5:PRINT#9 USING" 揚 填 基 "5ABS(TM) :TM(N) =T 

M: NEXT 

1919 CSIZE:COLOR 5:LOCATE 53,29:PRINT 

uSh whichever you 1ike.“ 

1929 COLOR 1:CONSOLE 21.3.53.27:PRINT “"[ 
1 ] --- (《 サイ ショ カラ スル )":SPC(4)1"[ 2 ] -- 

- { ツ ツ ~ ウ テ スル 。 )"iSPC(4)i:"[ 3 ] --- {( ヤメ ル 

})"::CONSOLE 

1939 S=STICK(9):IF S=@ OR S>3 THEN 1939 

1949 COLOR 2:LOCATE 55,29+S:PRINT#9 CHR$ 

( 48+5) 


“ ュ 1111H1 1 


"P 


1959 ON S GOTO 1969、1979,1989 

1969 PALET 2.3:GOSUB 2839:GOTO 5 

1979 PALET 2.3:SCREEN:GOSUB 2999:GOTO 89 
1989 COLOR 7:KEY9,"35 GOS. 3399:G. 59"+C 
HR$( 1 3 ) : END 

1999 REM 還 還 較 ノ ソート 加計 較 

1199 FOR T=1 TO 4:FOR K=(T+1) TO 5 

1119 UT=FNU(N,T,2):UK=FNU(N,K,2) 

1129 IF UT>UK THEN SWAP A(N,T) ,A(N,K) 
1139 IF UT=UK THEN UT=FNU(N,T, 1 ) :UK=FNU( 
NiK,1):GOTO 1129 

1149 NEXT:NEXT:RETURN 

1150 REM 回 還 還 カー ト ~ トリ カエ 還 還 較 

1169 Q(TM-29)=A(NLE):A(N,E) =Q(TN) :TN=TN+ 
1:IF TN=53 THEN TN=1 

1179 TM=TN:1IF TN<21 THEN TM=TM+52 

1189 RETURN 

1199 REM 還 還 虹 SCREEN | 画 還 較 

1299 CGEN 1:FOR 1=1 TO 5:U1l=FNU(N, IT,1):U 
2=FNU(N, 1 .,2) 

1219 X=Ix6-6:Y=Nx6-6 

1229 LOCATE X,Y+9:PRINT#9 "ーーーー": 


1239 LOCATE X、Y+1:PRINT#9 "1 "iM も (U1)j" 
へ "・ 

1249 LOCATE X,Y+2:PRINT#9 "| GND 

1259 LOCATE XY+3:PRINT#9 "1 "ECSIZE 2: 


CREV 1:IF U2<>19 THEN CGEN:PRINT#9 N$ も (U2 
)::CGEN 1 ELSE PRINT#9 N$(U2)・ 

1269 CREV:CSIZE:PRINT#9 "へ "ji:ELOCATE X,Y 
+4:PRINT# "トン ノレ ンプ ツバ 

1279 NEXT:CGEN: RETURN 

1289 REM 証 還 是 SCREEN 2 主題 軍 

1299 CGEN 1:FOR I=1 TO 5:X=lx6-6:Y=Nx6-6 
1399 LOCATE X,Y+9:PRINT#9 "rr エ エエ ーー"・ 

1319 LOCATE X,Y+1:PRINT#9 "HH "5 

1329 LOCATE X,Y+2:PRINT#9 "オリ : 

1339 LOCATE X,Y+3:PRINT#9 "オキ H ": 

1349 LOCATE X,Y+4:PRINT#9 "ローー ユ コッ ・ 

1359 NEXT:CGEN: RETURN 

1369 REM 回 証 田 ヤク ハン テイ 回 証 還 

1379 FOR !=1 TO 5:U1=FNU(N, 1 ,1):U2=FNU(N 
>1.2):B(U1)=B(U1)+1:C(U2) =C(U2)+1 :NEXT: 1 
F C(2)>9 THEN D(2)=1 

1389 FOR T=3 TO 14:IF C(T)>9 THEN D(T)=D 
(T-1 )+1 

1399 NEXT 

1499 B=9:Bl=9:C=9:C1=9:CC=9:CC1=9:D=9:D1 
=9:RR=9 

1419 FOR T=1 TO 4:IF B<B(T) THEN B=B(T) : 
B1 =T 

1429 B(T)=9:NEXT 

1439 FOR T=2 TO 14 

1449 IF C>=2 AND RR=1 AND C(T) >CC AND CC 
く 2 THEN CC=C(T ) : CC1 =T 

1459 IF C=<C(T) THEN CC=C:CC1 =C1 :C=C(T ) : 
C1 =T:RR= 1 

1469 IF D<D(T) THEN D=D(T ) :D1 =T 

1479 C(T)=9:D(T)=9:NEXT : RETURN 

1489 REM 証 証 昌 COM 還 証 還 

1499 GOSUB 1379:LU(N)=9 

1599 IF B=5 OR C=4 OR D=5 OR (C=3 AND CC 
=2) THEN RETURN 

1519 IF B=4 THEN 1699 


1529 IF C=3 THEN IF C1=2 THEN RETURN ELS 
E 1839 

1539 IF D=4 THEN 1649 

1549 IF C=2 THEN IF CC=2 THEN 1799 ELSE 
1839 

1559 IF B=3 THEN 1699 

1569 IF D=3 THEN 1649 


1579 IF RND(1)>.9 THEN LU(N)=1] 

1589 GOTO 1839 

1599 REM 還 還 較 ノラ フッ シ っ > 還 還 還 

1699 FOR I=1 TO 5:U1=FNU(N, 1 ,1 ) 

1619 IF U1<>B1 THEN E=I:GOSUB 1169 

1629 NEXT:RETURN 

1639 REM 還 還 較 スト レー ト 回 還 一 

1649 FOR 1I=1 TO 5:U2=FNU(N, 1 ,2) 

1659 IF U2>D1 OR U2=<D1 -D THEN E= 」 :GOTO 
1729 

1669 IF !I<5 AND CO(I)=9 THEN IF U2=FNU(N 
> 1+1.2) THEN 1689 

1679 GOTO 1739 

1689 Ul=FNU(N, IT,1):U2=FNU(N,T+1 ,1 ) 

1699 IF U1=B1 THEN =I 

1799 IF U2=B1 THEN =』+1 

1719 IF U1<>B1 AND U2 く <>B1 THEN E= 】-(RND( 
】)>.5) 

1729 GOSUB 1169:CO(E) = 1 

1739 CO( 1! )=9:NEXT 

1749 IF M>9 THEN RETURN 

1759 E=9:FOR 1I=1 TO 5:U2=FNU(N, [ ,2) 

1769 1」F C1=U2 THEN E=I:GOSUB 1169:I=5 
1779 NEXT:RETURN 

1789 REM 回 証 較 ノル ハウ ス 回 証 較 

1799 FOR I=1 TO 5:U2=FNU(N, 1,2) 

1899 IF U2<>C1 AND U2<>CC1 THEN E=I:GOSU 
B 1169 

1819 NEXT:RETURN 

1829 REM 還 還 田 へ " ア 加計 

1839 FOR I=1 TO 5:U2=FNU(N, 1 ,2) 

1849 IF U2<>C1 OR C=1 THEN E=1l:GOSUB 116 
9 

1859 NEXT:RETURN 

1869 REM 且 還 昌 ME 耳 証 還 

1879 S9=9:Sl=9:COLOR 6:CSIZE 2 

1889 FOR 1!=1 TO 5:CO(T)=1:LOCATE lx6-6,2 
4:PRINT#9 』::NEXT 

1899 LOCATE 36.24:PRINT#9 "END---[ 9 1]": 
:CSIZE:COLOR 7 

1999 S=STICK(9):IF S>9 AND S<6 THEN S1 =S 
1919 IF S=9 THEN 1959 

1929 IF CO(S1 )=9 THEN 1999 

1939 CO(S1)=9:59=S9+1 :CONSOLE 18.5,.S1x6- 
6.6:CLS:CONSOLE:PLAY "05B み " 


1949 IF S@<5 THEN 1999 

1959 LOCATE 9,24:PRINT SPC(58): 

1969 FOR 1=1 TO 5:IF CO(I)=9 THEN FE=I:GO 
SUB 1169 

1979 NEXT:RETURN 

1980 REM 還 較 写り 回 

1999 U1=FNU(WI,5,1):U2=FNU(WI,5,2) 

2999 IF D1=U2 AND D9<U1 THEN Dl=U2:D9=U1 
: =WI 

219 IF D1<U2 THEN D1l=U2:D9=U1:W=WI 

2929 RETURN 

2039 REM 還 較 還 | 回 

2949 IF D@<>C1(VI ) THEN 2999 

2959 FOR K=9 TO J:FOR K1=1 TO 5:WIK=WI(K 
) 

2969 U1=FNU(WIK,K1I,1) :U2=FNU(WIK,K1,2) 
2979 IF D9=U2 AND U1=4 THEN W=WIK:K1=5:K 
= は 

2989 NEXT:NEXT 

2999 IF D8<C1(WI) THEN D9=C1(wI):wswI 
2199 RETURN 

2110 REM 較 還 2 還 較 較 

2129 FOR K=1 TO 5:U1=FNU(WI,K,1):U2=FNU( 
WI ,K,2) 

2139 IF D@<>U2 AND DI<>U2 THEN U3=U1 :U4= 
U2 

2149 NEXT 

2159 IF D8<>C1(WI ) THEN 229 

2169 IF D1<>CC1 (WI ) THEN 2199 

2179 IF D2=U4 AND D3<U3 THEN D3=U3:W=wI 
2189 IF D2<U2 THEN D2=U4:D3=U3:W=w1 

2199 IF D1<CC1 (WI ) THEN D1=CC1(wI ):D2=U4 
: D3=U3:W=wI 

2299 IF D9<C1(wI) THEN D9=C1(WI ) :D1=CC1( 
WI ) :D2=U4 :D3=U3:W=wI 

2219 RETURN 

2220 REM 還 識 音 367 回 

2239 IF D9<C1(wI) THEN D9=C1 (WI ) :W=wI 
2249 RETURN 

2259 REM 還 還 還 4 

2269 FOR K=1 TO 5:U1=FNU(WI,K,1):U2=FNU( 
WI ,K,2) 

2279 IF D9=U2 THEN U3=U1 

2289 NEXT 

2299 IF D9=D1(WI) AND D1<U3 THEN D1=U3:w 
=UI 

2399 IF D@<D1(WwI) THEN D9=D1(wI):D1=U3: 
= MI 

2319 RETURN 

2329 REM 還 還 還 589 還 還 

2336 IF D@=B1(WI) AND DI<C1(WI) THEN D1= 
C1(WI ) :V=WI 

2349 IF D@<B1(WI) THEN D9=B1(MI):D1=C1(W 
1) : WMI 

2359 RETURN 

2369 REM 還 較 理 COM]| 一 

2379 IF OYA=N THEN 2449 

2389 IF MM=9 THEN 2419 

2399 IF R<59 AND YAK(FO,N)<3 THEN RETURN 
2499 M(N)=MM+(R>59 ) x(MM<29 )x(1-RNDx(19-M 
M) x(MM>9) ) : RETURN 

2419 IF YAK(FO,N)<2 THEN IF LU(N)=1 THEN 
M(N) =RNDx9+ 1 : RETURN ELSE RETURN 

2429 IF YAK(FO,N) >6 THEN M(N)=RNDx9+1 :RE 
TURN 

2439 M(N)=RNDx9+1 : RETURN 

2449 IF YAK(FO,N) >7 AND R>99 AND MM<29 T 
HEN M(N)=MM+ 1 : RETURN 

2459 IF YAK(FO.N)<2 AND MM>2 THEN RETURN 
2469 CM=-(R>69)*(YAK(FO,N)/2)x(RND+1 ) 
2479 IF MM+CM>29 OR CM>19 THEN M(N)=MM E 
LSE _M(N)=MM+CM 

2489 RETURN 

2499 REM 還 議 還 COM3 還 較 較 

2599 IF YAK(FO,N)=9 THEN IF LU(N)=1 AND 
MM<2 THEN M(N)=RNDx9+1 RETURN ELSE RETUR 
N 

2519 IF YAK(FO,N)<3 AND R>YAK(FO.N)*19 T 
HEN RETURN 

2529 CM=- (MM<29 ) x(1-(MM=9)*YAK(FO.N)*RND 
)- (OYA=N) (YAK(FO,N)/3) *RND 

2539 IF MM+CM>29 OR CM>19 THEN M(N)=MM E 
LSE M(N)=MM+CM 

2549 RETURN 

2559 REM 還 較 田 COM3 回 

2569 IF YAK(FO.N)<3 AND R<(169-(YAK(FO,N 
)+1)x(RNDx9+1) ) AND LU(N)=9 THEN RETURN 
2579 IF MM>9 THEN 2629 

2589 FOR I=9 TO YAK(FO,N) 

2599 M(N)=M(N)+RNDx(19-YAK(FO,N) )+1 

2699 IF M(N)>19 THEN M(N)=1 

2619 NEXT:RETURN 
2629 IF YAK(FO,N)<3 AND MM>19 AND LU(N)= 
9 THEN RETURN 

2639 G=G+1:CM=RNDxGxYAK(FO,N)+(R く 95)*(RN 
DxYAK(FO,N) >1 ) -(LU(N) =1)x8 

264 IF CM>19 THEN CM=CM- 19 :GOTO 2649 
2659 IF CM+MM>29 THEN CM=29-MM 

2669 M(N)=MM+CM 

2679 RETURN 

2689 REM 還 議 還 - ン ソーン 還 還 還 

2699 PLAY"03G9":COLOR 6 

2799 FOR K=1 TO 3+(MM=29)+(MM=9):10CATE 
12xK-12,24:PRINT Ki"---":SS$(K)::NEXT 
2719 S=STICK(9):IF S=9 OR S>3+(MM=29)+(M 
M=9) THEN 2719 

2729 LOCATE 9,.24:PRINT SPC(34)::ON S GOT 
0 2789,2799 

2739 TIME=9:F=29-MM:IF F>19 THEN F=10 
2749 LOCATE 9,24:PRINT SS$(S):" (1 カラ ":S 
TR を (FE5 "0": 

2759 1I$=INKEY$(6) :CH=INSTR(CH$ 1$ ) 

2769 IF CH=9 OR (CH=S AND TIME<2) OR MM+ 
CH>29 THEN 2759 . 

2779 M(4)=MM+CH:GOTO 2819 

2789 RETURN 


ポジ ェ ッ 


2799 IF MM=9 THEN 2736 

2899 M(4)=MM 

2819 LOCATE 9@,24:PRINT SPC(24) ::RETURN 

2820 REM 還 還 較 ショ キ セ ッ テイ 還 還 還 

2839 FOR 1I=1 TO 4:M$( 1])=CHR$(83+(4-1)%2 。 

84+(4-I)x2):TM(1)=59:NEXT 

2849 FOR I=2 TO 19:N$(1)=RIGHT$(STR$(」 ) , 

1):NEXTEN$(11)="J"EN も (12)="Q" EN も (13)="K" 

:N$(14)="A" 

2859 FOR 1I=1 TO 3:P$(T)="0"+RIGHT も (STR$( 

IX2)。1)+"C3":NEXT 

2869 RESTORE 2879:FOR I=9 TO 9:READ YK$( 

1 ) :NEXT 

2879 DATA ノ - へ ? ア 。 ワ ン へ ? 了 ツー へ ? 了 , ス リー カー ト ~ , ス トレ ー 

ト , フラ ッシュ , フル ハウ ス , フォ ー カ ー ト ~ , スト レー ト フラ ッシュ , ロイ ヤル 
スト レー ト フラ ッシュ 

2889 SS$( 1 )=" ト ^ ロ ッ フ ? "5S$( 2 ) = "コー ル "1 SS$ 

(3)=" リ レイ ス ~ "ECH$S= "1234567899" と 

2899 FOR I=1 TO 3:NA$(1)= "COMPUTER "+CHR$ 

(48+1):NEXT:NA$(4)="YOU" : RETURN 

2999 FOR 1=1 TO 4:OY(I)=9 

2919 LINE(289,Ix48-5)-(639,(1-1 )x48) ,PSE 

T,2.B 

2920 LINE(289,Ix48-25)-(639,1x48-25) ,PSE 


2939 LINE(399,Ix48-25)-(399,Ix48-5 ) , PSET 
2949 LINE(599,Ix48-25 )-(599,Ix48-5 ) ,PSET 


2959 NEXT 

2969 RETURN 

2979 REM 還 証 還 CHARACTER 男 還 田 

2989 RESTORE 3919 

2999 FOR 1=1 TO 28:READ A,A$:DEF CHR$(A) 

=HEXCHR$(A$) : NEXT 

3999 REM 還 還 昌 DATA 回 較 較 

3919 DATA 36 ,287CAAA87C2AAA7C287CAAA87C 

2AAA7C287CAAA87C2AAA7C 

3929 DATA 48 ,26692929292929762669292929 

2929762669292929292976 

3939 DATA 83 ,FFFFFFFFFFFFFFFFFCF9C98999 

9988E9FCF9C989999988E9 

3949 DATA 84 ,FFFFFFFFFFFFFFFF3F9F939199 

9911973F9F939199991197 

3959 DATA 85 ,8199999989C9F9FEFFFFFFFFFF 

FFFFFF8199999989C9F9FE 

3969 DATA 86 ,8199999991939F7FFFFFFFFFFF 

FFFFFF8199909991939F7F 

3979 DATA 87 ,FCF9C99999C9F9FCFFFFFFFFFF 

FFFFFFFCF9C99999C9F9FC 

3989 DATA 88 ,3F9F939999939F3FFFFFFFFFFF 

FFFFFF3F9F939999939F3F 

3999 DATA 89 、FFFFFFFFFFFFFFFFF8F8F89209 

92FEF9F8F8F8920992FEF9 

3199 DATA 99 ,FFFFFFFFFFFFFFFF1F1F1F4999 

497F9F1F1F1F4999497F9F 

3119 DATA 158,9999991F1F1F1F1F9999991FIF 

1F1F1F9999991F1F1FIF1F 

3129 DATA 144.999999FFFFFFFFFF999999FFFF 

FFFFFF999999FFFFFFFFFF 

3139 DATA 155.999999F8F8F8F8F8999999F8F8 

F8F8F8999999F8F8F8F8F8 

3149 DATA 145,1F1F1F1FIF1FIF1FIF1F1F1F1F 

1F1F1F1F1FIF1F1FIF1F1F 

3159 DATA 32 ,FFFFFFFFFFFFFFFFFFFFFFFFFF 

FFFFFFFFFFFFFFFFFFFFFF 

3169 DATA 159,F8F8F8F8F8F8F8F8F8F8F8F8F8 

F8F8F8F8F8F8F8F8F8F8F8 

3179 DATA 156,1FIF1F1FIF9999991F1F1F1F1F 

9999991F1FIF1F1F999999 

3189 DATA 143,FFFFFFFFFF999999FFFFFFFFFF 

9999990FFFFFFFFFF999999 

3199 DATA 157,F8F8F8F8F8999999F8F8F8F8F8 

900999F8F8F8F8F8999999 

3299 DATA 154.99999999919691969999999996 

9196919999991F1E191E19 

3219 DATA 147,09999999996681669999999966 

997E99999999FF66997E99 

3229 DATA 151,99999999896989699999999960 

896989999999F878987898 

3239 DATA 149,.99969196969196999791969191 

9691071F191E19191E191F 

3249 DATA 159,1866816666816618E7997E9999 

7E99E7E7819981819981E7 

3259 DATA 148,9969896969896999E989698989 

6989E9F8987898987898F8 

3269 DATA 153,.96919691999999999196919699 

9099909191E191E1F999999 

3279 DATA 146,6681669999999999997E996699 

999999997E9966FF999999 

3289 DATA 152.69896989999999998969896999 

909990998789878F8999999 

3299 REM 回 還 較 EXPLANATION Of GAME 還 還 

3399 CSIZE 3:COLOR3 :LOCATE 28.9:PRINT#9 

"GAME ノ ヤツ メイ " 

3319 COLOR 4:LOCATE 4.2:PRINT 甘 9 "CARD C 

ANGE":COLOR 7:CSIZE 

3329 R=INT(RNDX4)+1:FOR 」=1 TO 5:A(2,1)= 

VAL("&H"+HEX$(R)+HEX$( 9+1 ) ) : NEXT 

3339 GOSUB 2839:N=2:GOSUB 12909 

3349 CSIZE 2:COLOR 6:LOCATE 9,11:PRINT#9 
1 2 、 3. 4 5"ECOLOR 7:CSTZE 

3359 LOCATE 9,13:PRINT "ステ タイ カー ト ~ ノ シタ ノ ス 

ウン ドブ オシ テク タ ~ サ イ 。 " 

3369 LOCATE 9.15:PRINT "ステ タイ カー ト ~ カ ~ ナク ナッ 

タ ト キ ハル "PRINT 

3379 CSIZE 2:COLOR 6:PRINT#9 “"[ 9 ] KEY" 
COLOR 7:CSIZE:PRINT " ブ オシ テク タ ~ サ イ 。" 

3389 CSIZE 3:COLOR 4:LOCATE 52.2:PRINT#9 
"BET":COLOR 7:CS1ZE 

3399 FOR 1=1 TO 3:LOCATE 44.4+Ix2:PRINT 

SS$(T): リ シタ イト キハ "iCOLOR 6:PRINT "[" KT:" 
] KEY。":COLOR 7:NEXT 

3499 LOCATE 42.13:PRINT "「 "ECOLOR 6:PR 
INT "コー- ル (1 カラ 19)"::COLOR 7:PRINT " 」 ト 

、 テ ~ タ トキ " 


ルク 


3419 LOCATE 43.15:COLOR 5:PRINT "1 トル "5: 
COLOR 7:PRINT " カラ "ji:COLOR 5:PRINT "19 ト 
ML" 5 iCOLOR 7:PRINT " マテ ~ カケ ラ レ マ ス 。" 

3429 LOCATE 42.17:PRINT "7 "iiCOLOR 6:PR 
INT “レイ ス ~ (1 カラ 2 2)“" iCOLOR 7:PRINT " 」 ト 
ヽ ュ テー タ ト キ 衝 " 

3439 LOCATE 43,19:COLOR 5:PRINT "1 ト に "5: 
COLOR 7:PRINT " ヵ う "ji:COLOR 5:PRINT "2? ト 
- ル "5 iCOLOR 7:PRINT " マテ ~ カケ ラ レ マ ス 。“" 


3459 CSIZE 2:LOCATE 2.29:PRINT# "ヨミ オ ワ ッ タ 
ラペ 


3469 CSIZE 3:CFLASH 1:LOCATE 2.22:PRINT# 

9 "HIT SPACE KEY":COLOR 7:CFLASH:CSIZE 

3479 IF STRIG(9) THEN CLS ELSE 347@ 

3489 CSIZE 2:COLOR 1:LOCATE 12,.9:PRINT#9 
"「 ヤ ク 」 ノ シュ ルイ 。 ( ツ ヨ イ シュン ) " 

3499 FOR !=1 TO 19:LOCATE 12,Iw2:COLOR 6 
:PRINT#9 USING" 間 侍 " ii:COLOR 4:PRINT#9 Y 


3599 LOCATE 19,.22:COLOR 2:PRINT "[ チュ ウイ 
1" siCOLOR 4:PRINT " 。 ストレート": :COLOR 7:PRI 
NT " ラッ クル アイ 『" ii:COLOR 5:PRINT "A"i:C 
OLOR 7:PRINT "」 ト 7" ij:COLOR 5:PRINT "2": 


:COLOR 7:PRINT “"」 用 ツ ツ ~ カ ナイ ヨウ ニ ナッ テイ マス 。" 


3519 CSIZE 2:CFLASH 1:COLOR 3:LOCATE 24, 
24:PRINT#9 "HIT SPACE KEY“::COLOR 7:CFLA 
SH:CSIZE 


3529 IF STRIG(@) THEN CLS:RETURN ELSE 35 
3449 LOCATE 42.21:COLOR 2:PRINT “"w"iiCOL 29 


OR 7:PRINT "19 ト ^~ ル カケ タイ トキ 八 “5:COLOR 6:PR 
INT “"[ 9@ ] KEY。":COLOR 1 


K$(19-1 ) :NEXT:CSIZE 


古 変数 リス ト ・ DO.D1.D2.D3.… 勝 者 判定 用 ・ 820- 880 掛け 金 の 秘 動 一 チェ ッ ク ボ イン ト 
O( )…: 山 札 ・ S3…… ド ロッ プ 、 コール 、 レ 900 ご 1000 スコ ア 表 示 : 長い だ け あ つて と て も よい で 
A( )…… 手 札 ・ イズ の 値 ・ 1010-1080 キー 入力 ・ き 。 十 分 に 遊べ る し プロ グラ ム 
YAK( )…… 役 記憶 ・B( )BI( )C( )C1( )CC( ) : 1090-1140 ソー ト ・ も 見 や すい し 、 こ れ と いつ て 文 
WINER-… 勝 者 記憶 ・ CC1( ),D( ))DD1,B,B1.C,  : 1150 こ 1180 カー ド と り ガ え  : 旬 な し 。 う お む 。 そ うだ 、 自 分 
TM( )…… 持 ち 金 ・ C1.CC1.CC.D,D1-…- 役 判定 ・ 1190-1350 カー ド 表 示 の カー ド を 切り 問 違 つ だ と き の 
OY( )…… 親 の 回 数 ・ UTUK,U1.U2U3, ・ 1360-1470 役 判定 ルー チン だ め に 、 
MS$( )…… カ ー ド に の マー フク ・ U4……FNU 関 数 用 ・ 1480-1850 COM カ ー ド と り の 190 の 5 IF S= フ Z T 
NS( )…… カ ー ド の ナン バー : 甘 プ ログ ラム の 説明 か え ・ HEN GOSUB 1200 の 
YK$( )…… 役 の 名 前 ・ 10- 50 初期 設定 1 ・ 1860-1970 人 間 カ ー ド と りか : :GOTO 187 の 
NAS( )…… プ レイ ヤー の 名 前 ・ 90- 120 山 札 を セッ ト ・ 人 ・ 。 と 入れ と け ば 、 カ ー ド を 切り 
OYA…… 親 の プレ イヤ ー ・ 130- 170 シャ ッ フ ル : 1980-2350 役 が 同じ 場合 の 判 : 間 違 つて も ` フ "を 押す こと に よ 
HH…… ド ロッ プ し だ 者 の 数 ・ 180~- 230 初期 画面 3 定 ル ー チ ン 群 り カ ー ド が も と に 戻る ぞ 。 も つ 
MM…… 抱 は 金 ・ 240 270 カー ド を くば る  : 2360~-2480 COM1 の BET  : と も ギャ ヤン ブル な ん だ か ら チ ヨ 
MYK…… そ の 試合 で 勝つ だ 役 : 290- 370 カー ド と り ガ え  : 2490-2540 COM2 の BET  : ン ボ する ほう が 悪い ん だ けど ね 
の ナン バー ・ 380- 470 役 判定 ・ 2550-2670 COM3 の BET  : な お 提 け 算 の 「X」 は 小文字 の 
XY…… カ ー ド 表示 の 座標 ・ 480- 670 BET ・ 2680 一 2810 人 間 の BET : エッ クス 、1000 行 の 「 一 』 は カナ 
FO.,T,K,KK,K1.N,CS, ・ 680- 760 同じ 役 の 場合 の 勝 ・ 2820-2960 初期 設定 ・ キー の 上 の や つ 。( パ ンプ ) 
OP…… ル ー プ 用 3 者 判定 ・ 2970-3280 PCG 設 定 
RIR1.R2…… ラ ンダ ム 用 ・ 770- 810 OPEN 3290 こ 3520 ゲー ム の 説明 


29 FORI=1TO4:H(I)=9:NEXT:H=9:FORI=1TO4:【 
F MID$ も S(B$,T,1)=MID も (C も , 1,1) THEN _H(T)=1: 


1 INITECLICROFF:CLS:WIDTH89:DIM A(4).,H(4 
)STEMPOH00:LOCATES5.10:PRINT" 『P.C.G セット 


」 シリ ラク オマ チク タダ サイ "EGOSUB 33 Ne 
2 CLS:LOCATE 25.19:PRINT" セ ウメ イ カ か イリ マス カ 2 Ra 


(れこ < て イイ PE ャ NM 5 
3 Y$=INKEY$S(1):IF Y$ も ="Y" OR Y$="y" OR Y$ 
CLS:GOSUB 84 ELSE CLS 


23 FORI=1TO04:FORL=1TO4:IF I=L THEN 25 
24 IF MID$(B$ も ,!、1)=MIDS(C も し 、1) THEN H(I 


8 江 =" ン " THEN Na 
*⑳ 小 2 EMI DMRSN2 25 NEXT し :NEXTI 
生 シ 9 4 コ /- の 2 バラ ヤク ル の ンク 
の EPSYHTHDIF の 5 27 CT=9:FORT=1TO4:IF H(T)=1 THEN CO=176: 
相 ト 2 NEXT I:NEXTI H=1:M=15xT:GOSUB31 :CT=CT+1:LOCATE15xT+3, 
8 C$="":FORI=1TO4:C$=C$+MID$(STR$(A(I)) 9:PRINTMID$(B$,T,1 ) :GOT039 
2 陸生 2 28 IF H(T)=2 THEN CO=299:H=1:M=15xT:GOSU 
直人 SR の PR B31:LOCATE15xT+3、9:PRINTMID$(B$,T,1):GOT 
) ロ * rr 030 
3 沖 パ SM ER 0 29 COLOR6:CO=176:H=1:M=15xT:GOSUB31:COTL0 
の E xxx":FOR Ll=1TO4:COLOR6 :CGEN1 :M=15xL1 0 に まお 
5 :CO=176 :GOSUB31 :COLOR7 :CGEN:LOCATE15xL1+ R7:LOCATE1 SM 
陸 3.9:PRINT"2":NEXT 593 
4 癌 っ 、 2 : 
ドド マ NHN の ビビ "で 32 Ks0:CGEN1: BEEP:FORL=1TO3:FORI=9TO7:LO 
| ジラ ヲ イル テク タバサ イ スウ シト AN "5B$:LOCATE29 、15:PRIN MNO 又 双 
0 に やら お る 34 DEFCHR$( 32)=HEXCHR$("999090999090999 
に クベ ピコ ピン ピピ し 
ュ 福 14 FORI=1T04:IF ASC(MID$(B$,I、1)) く <48 OR HCS た EE お CCPEBSAUBBG 和 SIMBR6 
を ASC(MID$(B$,T、1))>57 OR LEN(B$)>4 THEN 9 8 8 
ら Rh F7E81804040201B9F7E81894949291B9F") 
7 飯 POR81e 介 出所 36 DEFCHR$(178)=HEXCHR$("8080C969FFFPFFF 
2 5 DHP OSIDSPGE SHE F998949207FFFFFFF998949297FFFFFFF" ) 
M RECTEONEP 時 37 DEFCHR$(179) =HEXCHR$("9090909999FFFFF 
テ 内 * も に 1 
寺 18 LOCATE39 ,5:PRINTSPACE$(38):" ":FORL2= RUSH EERGHHSC 由 EE 
バ 光 1 TO4:M=15xL2:LOCATEM+3,9:PRINT" ":CO=32 りみ に 
っ 内 RE Si F9990907FFFFFFFFF9999997FFFFFFFFF" ) 
カ 貞 の 0 39 DEFCHR$(181 )=HEXCHR$("999999F8FCFFFFF 
UM 4 F99998F8FCFFFFFF919393FBFFFFFFFF" ) 
ト 人 49 DEFCHR$(182)=HEXCHR$("0999999993FFFFF 
テ 伯 F9990999993FFFFFFF8FCFCFCFFFFFFFF" ) 
| ュ ン 
フ 


41 DEFCHR$( 183)=HEXCHR$( "99999735EAESFEF 
F909909739E9E9FCFF09099739E9E0FCFF" ) 

42 DEFCHR$( 184) =HEXCHR$S( "9FF5AAS6ACS58B0A 
99FF10202949819A99FF19292040819A9”") 

43 DEFCHR$( 185) =HEXCHR$( "1F3F7F7FFFFFFFF 
PIEF3P7F7EPFRFFFFEFEIF3F7P/PFFFFPFFFF") 

44 DEFCHR$ も (186 )=HEXCHR も S("FFFFFFFFFFFES8090 
EEFEPLEFREEEEEEKEEEEEEPPEFEFEFREE") 

45 DEFCHR$S( 187) =HEXCHR$S("FFFFFEFCFCFE910 
EEEEPEECPCPEPEEEEEPFEEECECEEPRFT  】 

46 DEFCHR$( 188) =HEXCHR$S("FFFF1F1F7819E9U 
9FFFP1F1F/D1AFSFFEEFFF1F1F7819EOFF") 

47 DEFCHR$( 189)=HEXCHR$S("FFFFFFFE9201000 
9FFFFFFFES6ABSSFFFFFFFFFE り 20190FF") 

48 DEFCHR$S( 199 ) =HEXCHR$("FFFF1F9F3F9FEM0 
9FFFF1F9F3F9FFFFFFFFF1F9F3F9FFFFF") 

49 DEFCHR$(191)=HEXCHR$("FFFFFFFFFFFF1FW 
PFFPFFFFPFFFFFPFEPFPFFFFFEFFFFFFFE"} 

59 DEFCHR$( 192)=HEXCHR$("E9F9F8FCFEFFFFF 
FE9F9F8FCFEFFFFFFE09F0F8FCFEFFFFFF" ) 

51 DEFCHR$( 193) =HEXCHR$( "FC7C3E1E9701000 
9FF7F3F1F97919999FF7F3F1F97919999") 

52 DEFCHR$( 194 ) =HEXCHR$( "999999999099690 
り FFFFFFPPFFFF7F97FFFFFFFFFFFF7F97“) 

53 DEFCHR$( 195 ) =HEXCHR$( "999999999099900 ひ 
EPREFFPPEFEEFEFFPPPFEPFFFFFFPFPFPFFPF") 

54 DEFCHR$( 196 ) =HEXCHR$( "9999990990900909 
FFPFFFFFFFPEFFFFFFFFFFPFFFFFCFFFFFF") 

55 DEFCHR$( 197 ) =HEXCHR$ も ("90999099909990990 
9FFFFFFFFFFFFFFFFFFFFFFFF93FFFFFF" ) 

56 DEFCHR$( 198) =HEXCHR も ("999999999194104 
9FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF" ) 

57 DEFCHR も $( 199 ) =HEXCHR も ("911920499997900 
DFPFPFFFPPPFFEGEOFPEFFFFFFTFFESEO") 

58 DEFCHR$( 299 ) =HEXCHR$( "FEFCF8F9C999900 
9FEFCF8F9C9999999FEFCF8F9C0909909") 

1 ウン 

69 DEFCHR$(219)=HEXCHR$( "990997182949494 
1999999999099999999909071F3F7F7F7F") 
61 DEFCHR$( 21 1 ) =HEXCHR$( "9999F8941F7FFFF 
F9990999999990999999999F8FCFFFFFFFF" ) 

62 DEFCHR$(212)=HEXCHR$( "9999999999FFFFF 
F7EFFFFFFFF9999997EFFFFFFFFFFFFFF" ) 

63 DEFCHR$( 213)=HEXCHR$( "99999999FCFFFFF 
F99783C1F9399999999099099FCFFFFFF") 

64 DEFCHR$ も (214)=HEXCHR$( "9990999993CFFFFF 
F913B7BF3C399990999109393933FFFFFFF" ) 

65 DEFCHR$( 215)=HEXCHR$S( "9999999993FFFFF 
FF8FCFCFCFC909999F8FCFCFCFFFFFFFF" ) 

66 DEFCHR$ も (216 ) =HEXCHR$ も ("99999F18F8EEFEF 
F999999900999999999099 り F1FFFFFFFFF" ) 

67 DEFCHR$(217) =HEXCHRS( "9099F9989492020 
2099099999999999099999FOF8FCFEFEFE" ) 

68 DEFCHR$S(218)=HEXCHR$( "432F9F1F3F3F3F3 
F90099009090099009097F3F9F1F3F3F3F3F" ) 

69 DEFCHR$(219)=HEXCHR$("FFFFFFFFFFFFFFS5 
F99999999999999F9FFFFFFFFFFFFFF5F" ) 

79 DEFCHR も (229) =HEXCHR$S("FFFFFFFCFCFFFFC 
り 999999990999903FFFFFFFFCFCFFFFFF") 

71 DEFCHR$ も (221)=HEXCHR$("FFFFFF071F96FFW 
799999999990999F8FFFFFF971F り GFFFF") 

72 DEFCHR$(222)=HEXCHR$ も ( "FFFFFFFEFE070FF 
C09099909999A85993FFFFFFFEFE979FFF" ) 

73 DEFCHR$( 223) =HEXCHR$( "FFFFFF930F93FF9 
990999099999999FFFFFFFF03 り F93FFFF" ) 

74 DEFCHR$ も (224 ) =HEXCHR$ も ("FFFFFFFFFFFFFT 
F999999909099999E9FFFFFFFFFFFFFFFF" ) 


75 DEFCHR$( 225 ) =HEXCHR$("C2ECF8F9F8FCFCF 

C90909999999999099FEFCF8F9F8FCFCFC") 

76 DEFCHR$(226 ) =HEXCHR$ も ("3E3D3E1F9F03909 

901039391999999993E3D3E1F9F939999") 

77 DEFCHR$ も (227 ) =HEXCHR$( "AB55AA5S5AAD5EA3 

FFCFEFFFFFF7F3F99AB55AAS5AADSEA3F" ) 

78 DEFCHR$( 228 ) =HEXCHR$( "99998949F87EFFF 

FFFFF7FBF87818999FFFFFF7FFF7FFFFF") 

79 DEFCHR$( 229 ) =HEXCHR$( "93919999999989E 

9FCFEFFF8FFFF7F1FFFFFFCF8FCFFFFFF" ) 

89 DEFCHR$( 230 ) =HEXCHR$("F8F99999900909000 

9970FFF97FFFFFFFFFFFF9F979FFFFFFF" ) 

81 DEFCHR$( 231 ) =HEXCHR$ も ( "99990999901971FF 

PPPEPEFEEEPRESBUODEFEPLPEPEFFEFERFF") 

82 DEFCHR$( 232)=HEXCHR$ も ("1F1F3F7FFFFFFEF 

8E0E9C989999909999FFFFFFFFFFFFFFF8" ) 

83 DEFCHR$( 233) =HEXCHR$( "FCFCF8F9E9C9990 

999099999999999909FCFCF8F9E9C09999"):RETU 

RN 

84 COLOR5:LOCATE27 2 EPRINT | ※※※ 

E 。 ※%%"ECGEN1:COLOR7 EPRINT 

85 ' セツ メイ 

86 CGEN:COLOR7:PRINT:PRINTSPACE も ( 15 ) : "コノ 
グーー ム ルル くく:COLOR2:PRINT 4 ウタ / スルッ" プ ナ 江 ラ 
URIR EN ビン トナ ミ テ アル モノ プス 

87 COLOR7:PRINT:PRINTSPACE$( 15 )・ "コン ヒ ? ラ タ ー 

罰 ”、 カン ガタ カメ ナ 11G0LOR2)PRINUI リッ アテ クタ サイ 
>。 SOLOUR/PRINJ 4 ウッ ノ ナブ) 「 

88 COLOR5:PRINT:PRINTSPACE も (15 )・" ツ カ ワレ テイ ナ 

イオ スウ シー プ イル タル リーT イ ツノ / クラ テイ (ニニ イタ ルコ HSA "3COLOE 
6:1=1:M=39:CO=176:H=1:GOSUB31:COLOR7 ELO 

CATE 49.11:PRINT"= コノ ウシ カ ~ テマ ス 。『 

89 LOCATE15.13:PRINT " ツ カ ワ ウレ テ イル カ ~ クラ イカ チ が “ 

ウト キハ "ECOLOR7:T=1:F=4:M=E39:CO0=299:H=1:GO 

SUB31:LOCATE 49.15:PRINT "= コノ ウシ ンカ ~ テマ ス 。 


MOO GAM 


99 LOCATE15 ,17:PRINT "ツリ カ ワレ テイ テ クラ イモ オナ シ ~ ト キ 
AA "ICOLOR7E1=1:F=E8:M=39:CO=176:H=1:GOSUB 


31:LOCATE 49.19:PRINT "= コノ ウシ ガ " テマ ス 。『 

91 COLOR7:iI=1:F=19:M=18:CO=176:H=1:GOSUB 

31:LOCATE 28.22:PRINT "= コノ ウシ ブフ 4 カイ マデ“ ニ 4 

サタ トモ ソロ エル ト カチ テ ~ ス 。" 

92 LOCATE30 24:PRINT "スペ シース キー ブラ オシ テ クタ “サイ 
"に YS=INKEY も SE: IF Y$=" | THEN RETURN :ELS 

9 夫 じ の 

93 L=1:REPEATE:BEEPELOCATE52.15: PRINT "マカ 

トイ 1 "iPAUSE1 :LOCATE52.15:PRINT" ・ 

L=L+1EUNTIL L=5 EGOTO12 

94 "カチ 

95 LOCATE39.5:PRINT "ヤッ タネ ー "CA" カイ テ ~ アタ ッ 

タ ヨ 1 "ECGENECOLOR6:CSIZE2 ELOCATE29 16:PRI 

NT 韻 り 。" オ メ テ に トワ 1 了 アナ タ ノ / カナ デス”:PLAY "VI1S05F1RS 

PLR2FTIR2FSR5GSFOGSPSF5" 

96. COLOR75LOCATE25 、22IFPRINMI も ウ イチ トド” シィ スカ 
EAT マテ イイ 下 ysND " ミ 

97 Y$=INKEY$(1):IF Y$S=E"YD OR Y$="y" OR Y 

$=" ン " THEN 4 ELSE IF Y$="N" OR Y$="n" OR 

Y$=" ミ " THEN 109 ELSE 96 

9 マサ 

99 LOCATE30 、5: PRINT "カイ スウ オー ハーー テ ^ ス タメ ネエ ー 

1 7:CGEN:COLOR1 ECSIZE2ELOCATE29,16:PRIN 

T せ 9 。、 "サー ン ネ ン ! 了 ナ タ ノ マ ケ テ ~ ス ":PLAY"V150iFSR5F5 

RSESRD" 

199 LOCATE29.22:PRINTSPACE$(69 ) :CFLASH1 : 

COLUR プ SLOCAIHE90、 2201FRINT モモ り デキ マレ 95 

ス ^ 11 "ENEW 


一変 数 リス ト 

A( )… ド コシ ンピュータ の 4 ケタ 
の 数 字 9 

H( )…… そ の ケタ の 繧 の た め の ・: 
ラグ ・ 

Y や Se ee キー 入力 


C ぷ …… コン ピュ ユー タ の 数 字 の 
文字 列 

M…… 牡 邊 の 座標 

CO…… 何 を 表示 する か の コー 


層 


還 プ ログ ラム の 説明 
1 初期 設定 ・PCG 設 
定 
2- 3 画面 リア ・ 説 明 の 
有無 
4 初期 設定 


5~ 6 ケタ の 数 字 を 作る 

9…12 和牛 表示 ・ 入 力 

13 一 16 入力 判断 (4 ケタ の 別 
々 の 数 字 ガ や ) 


19-21 数 字 も 場所 も あっ て : 100 お まけ 
いる か 判定 ・ 一 チェ ッ ク ボ イン ト 
22-25 数 字 が あつ て 場所 が な か な ガキ ヤラ が 可愛 い 。 だ 
違う か 判定 けど 負け る と プロ グ ブラム を 消し 
26-30 和牛 表示 て し まう の は ちよ っ と ね 。 そ こ 
31-32 和牛 表示 サブ ルー チン  : で 100 行 の PRINT の 後 を 、 P 
33-58 牡 邊 PCG デー マ R I NT パ ツ ギ デ ガ ン バ リ マシ 
59-83 牝 邊 PCG デー タ ョ ヨウ 1? : CFLASH9 : ビ 
84-92 説明 表示 AUSE50 の : GOTO2 
93 エラ ー 表 示 そし て 97 行 の THEN 1 
94-95 勝ち 表示 2②9 の を THEN END 
96-97 再 ゲ ー ム 入力 どす れ ば よい で し よう 。0 ひ ンプ) 
98-99 負け 表示 


SN 糧 


*-) き ニ 
こ 半 


> 二 ) さま に 三 
ほ に ひび 衝 バ と いさ て Err や ヤ 革 > < 乱 下 


ューー 
ーーー 
ーー マグ 


( 


バン 2 


ん 


Ns 
"0 


こう 
る 介 則 豆 届 


ン 
ーーー 
Oc 


: い 


\ ヽ 


で < さて で 
ーー バン 
N ン 


デー ド OO の 
に 


で Tk 
さき 半 で の 二 芝 
Aa = 
2 の うう つの の て 
ーー 


2 コ 
o と 


な ぶ ご さき の EEU マー 。 
anNTA 


< っ K と ご 
(m つ の ヤ 半 は 5 狂 守 涯 全 : 


1 ' ※※※※※※※※※※ CATERPI DYy パン だ 1984 
。12.22 迷 迷 潤 ※ 革 区 芝 区 区 区 

29 GOSUB 449:CGEN 1 | 

39 REPEAT :CELASH 1:COLOR 5:LOCATE 8,.21:P 
RINT " PRESS SPACE OR TRIGGER ":CFLASH 9 
・KJ=9:REPEAT :KJ=(KJ=1)+1:UNTIL STRIG(KJ) 
・BEEP:ST=1:CA=5:SC=9 

49 REPEAT : GOSUB 269:M=1:C=36:MEF1=9:MEF2= 
・FL=19:DM=9:FF=9:UN=9:WP=9 

59 FOR I=9 TO 12:AD(I)=13179+ 1 :NEXT :FOR 
I=6 TO 19:OUT AD(T),.33:NEXTEOUT AD(11) ,C 
:OUT AD(1),.43:PLAY "C9R9C9R9D9R9E9R9R9" 
6 ' 況 ※※※ 芝 区区 ※※※ MAIN ※※※※※ 光 %※※ 光 ※ 区 

79 REPEAT:S=STICK(KJ):TF HM(S) く <>9 THEN M 
=HM(S) :C=HC(5S) 

89 AD(12)=AD(11)+M:ON INP(AD(12) ) -37 GOS 
UB 169,.189,199.,200 

99 FOR I=9 TO 11:AD( IE )=AD( ET1) : NEXT : OUT 
AD(5),.32:OUT AD(9).32:FOR IT=6 TO 19:OUT 
AD(I),.33:NEXTEOUT AD(11).C:WP=INP(AD( 1 ) ) 
・TF WP>32 AND wP<38 THEN DM=1 99 

199 OUT AD(1),.44+FF:FF=(FF=9):UN=9:FOR I 
=6 TO 11:UN=UN+(INP(AD( TE)+49) >37 ) : NEXT 
119 MEF1=-1:wWHILE UN=9:FOR I=6 TO 11:OUT 
AD(T),32:AD(T)=AD(T)+49:NEXT:FOR I=6 TO 
19:OUT AD(IT).33:NEXTEOUT AD(11).C:TEF INP 
(AD(1)) く <49 THEN DM=199:UN=- 1 

129 MEF1=ME1+2:PLAY" EE"+MID も S(M1$,ME1 .2) :GO 
SUB 179:FOR IT=6 TO 11:UN=UN+ (INP(AD( 1 )+4 
9 ) >37 ) :NEXT : WEND 

139 MF2=MF2+1:PLAY MID$S(M2$ も MEF2 , 1 ) :ME2=M 
F2※-(MF2 く 1 6 ) 

149 UNTIL DM=199 OR FL=9:IF DM=199 THEN 
GOSUB 239 ELSE GOSUB 219 

159 UNTIL CA=9:GOSUB 249:UNTIL INKEY$ も =CH 
R$(13):INIT:END 

169 M=-M:C=71-C:AD(12)=AD(12)+M:PLAY "BAG 


179 DM=DM-(DM く 199):LOCATE 29.24:PRINTUSI 
NG "※※ 提 ":DMi :RETURN 
189 FL=FL-1:SC=SC+19:LOCATE 6,24:PRINTUS 
ING "※※ 拉 拉 半 "5SCi OUT AD(9) ,49-(FL=(DM MOD 
19) OR FL=(CA MOD 19)):PLAY"O7CDEGBO5" : 
RETURN 上 
199 DM=DM-(DM く 91)%19:LOCATE 29,24:PRINTU 
SING "%※%※ 村 "5DMiEPLAY":FBFBFBFB" : RETURN 
299 SC=SC+199:LOCATE6 , 24:PRINTUS TNG " ※※ 拉 六 
##"5S5Ci iPLAY "07CDEGBCDEGBCDEGBO5 "iRETURN 


219 COLOR 5:CFLASH 1:LOCATE 12.21:PRINT" 


STAGE CLEAR "iCOLOR 6:LOCATE 19.21:P 
RINTUSING"%%" 5ST:CFLASH:PAUSE 19:IF DM<3 
9 THEN CA=CA+ 1 
229 FOR I=DM TO 9 STEP-1:LOCATE 29.24:PR 
INTUSING "※※ 提 "315 :SC=SC-1:LOCATE 6,.24:PR 
INTUSING "※※ 提 寺 半 "5SCi:PLAY "CDEGB+C+D+E+G 
+B":NEXT :ST=ST+1 :PAUSE 39:RETURN 
239 FOR !I=1 TO 15:FOR J=6 TO 11:OUT AD(J 
) , 33:NEXT :PLAY MID も S(M2 も ,1+T, 2):FOR J=6 T 
0 11:OUT AD(J) ,32:NEXT ENEXTEOUT AD( 1 ) ,32 
:CA=CA-1:RETURN 
249 CLS:CSIZE 3:CFLASH 1:COLOR 5:LOCATE 
19,12:PRINT#9"GAME OVER" :CFLASH: CSIZE:PL 
AY"R5R9"+M1$+ "Rg9 ER9"+M1$+ "RS5R9" EGOSUB 63 
9:RETURN 
25 人  ' 迷 迷 ※ 光 ※ 党 光 区 ※ OOTAGE ※ 洋 半 交 区 区 区 区 
269 COLOR 7:CLSiLINE(9.9)-(39.23)」 "8".。B: 
COLOR 5:LOCATE 9.24:PRINT "SCOREE "5 ELOCAT 
E 13.24:PRINT "DAMAGE: "5 ELOCATE 25,.24:PRI 
NT "STAGE: "5 ELOCATE 36.24:PRINT "TE の 5 
279 COLOR 6:LOCATE 6.24:PRINTUSING " ※※ 韻 井 提 
"3 SCi LOCATE 29.24:PRINT"999" 5 :LOCATE 31 
s24:PRINTUSING"%%" 5 STi:LOCATE 37,24:PRIN 
TUSING"%w"5CA-1j::COLOR 7:LOCATE 35,.24 
289 PRINT CHR$S(34)j:RESTORE 429:ON ST MO 
D 19 RESTORE 339,349.359 ,369,379,389,399 
v ゝ 499,419 
299 FOR I=9 TO 12:FOR J=2 TO 8:LOCATE I 
3+3。JX3-3:PRINT "&" ENEXT: NEXT 


399 READ D$:FOR !I=1 TO 29 STEP 2:X=VAL(" 
&H"+MID も (D も 1,1)):Y=VAL("&H"+MID$(D も ,1+1 
>1)):LOCATE XX3。Yx3:PRINT" "ENEXT ELOCATE 
8.21:PRINT SPC(24):XF=3: YEF=9 

319 READ D$:1=1:REPEAT :REPEAT :X=VAL("&H" 
+MID$(D も ,T, 1)):Y=VAL("&H"+TMID も (D も , 1+1 ,1) 
):LINE(XX3,Yx3)-(XX3+XF 、YX3+YE) 。 "8" : エ =1+ 
2:UNTIL X=15:XE=9:YE=3:UNTIL Y=15 

329 COLOR 6:RETURN 

339 DATA 469635A524B462725181.6655754484 
339322A211B1F963735282419139A9FF 

349 DATA 617122B225B563736474,17B7369655 
7552723191F916C635A55484528231A119C9FF 
359 DATA 2352744524427355B1C1 , 2233546562 
5334259196A6F921324364757162533425A1A2A3 

A4A5FF 

369 DATA 35A56364747352558582.26A6418151 
71614686567666F924B425B532A233A341914292 
44944595FF 

379 DATA 1171C142922354B49576.4151A11262 

A2336383143464F951A1B1125262A2C213334363 
8393C3344484FF 

389 DATA 63736474518166764393.5272557534 
9423A33292F96171528253835484459534A423B3 
31A14999FF 

399 DATA 14C423B34393548434A4.F921B14191 
S58515C535A512C232A25282637324B44494FF 
499 DATA 11C16272657516C636A6,F912213941 
52638495B5C4C2B1A991827354452514FF 

419 DATA 22B223B324B455856575,11B121A115 

B525A562448454744686567666F931A132A233A3 
34A414C413C312C2637344944595FF 

429 DATA 12244153727593A1A5C5,1121324233 
34446171638292B1B21525162645466676B4B6B7 

F92122323361628283A2A3B1C115163545556465 
9495B4B5C6FF 

43 ' ※※※※ 迷 革 ※ 光 ※ 光 INI T ※※※ 守 ※※ 区 区区 

449 CLS 4:INIT:WIDTH 49:CLICK OFEF:DEEFTNT 
A-Z::TEMPO 1111:PLAY "05R9 :04R9" 

459 DIM AD(12):FOR IT=9 TO 8:HM(IT)=9:NEXT 
・:EOR =1 TO 4:HC(T+T エ )=33+1 ENEXT :HM( 2 ) =4 

9:HM(4)=-1:HM(6)=1:HM(8)=-49 

469 M1$="+B+TA+TG+TF+TE+TD+C B A GEFED C-B- 

A-G-F-E-D-C" :M2$= "FCFCGDGDAEAEGDGD" 

47 ' 交 % 光 区 ※※※※※※ PCG & TITLE ※X※※※※※※ デ 区 

489 DEFCHR$( 32 ) =HEXCHR$( "999999999999990 
999990999999999999999999999999999") 

499 DEFCHR も ( 33 ) =HEXCHR も ("999C3E7E7EFEFE7 

C997CFEFEFCFCF869997CFEFEFEFEFE7C" ) 

599 DEFCHR$ も (34 ) =HEXCHR$( "9998167E3ABABA6 

C99FEFEFEB8B8B8699938D6FEBABABA6C" ) 

519 DEFCHR$(35 ) =HEXCHR$( "9998165E5EF69E7 

C997EDEDEDCF498699978D6DEDEF69E7C" ) 

529 DEFCHR$( 36 ) =HEXCHR$( "999C167676DEE97 

C99FCF6F6F4DCE969993CD6F6F6DEE97C") 

539 DEFCHR も ( 37 ) =HEXCHR$( "999C3A3A3AFED63 
8996CBABAB8FCF8E6996CBABABAFED638" ) 

549 DEFCHR$ も (38 ) =HEXCHR$( "9909999999999990 
999FBFBFB99BFBFBF9999999999999999") 

559 DEFCHR$ も (39 ) =HEXCHR$( "99992854AA54AA5 
4999998598A598A5438197CFEEFEFEFE7C" ) 

569 DEFCHR も $( 49 ) =HEXCHR$( "992874EA54999099 
999387CFEFE1979699999294999197969") 

579 DEFCHR$( 41 ) =HEXCHR$( "999999999999990 
9997CFEFEFEFEFE7C542854AA54AA5428") 

589 DEFCHR$( 43) =HEXCHR$( "9999294999FFFFF 
F993C62C181D9D9D99999294999FFFFEFF" ) 

599 DEFCHR$( 44 ) =HEXCHR も ("9999294918FFFFEF 

F993C7EFFFFD9D9D9999929583CFFFFFF" ) 

699 GOSUB 639:CGEN 9:CFLASH 1:COLOR 5:LO 

CATE 14.21:PRINT" チョ ッ ト マッ テ ネ "ECFLASH 9 

619 FOR IlI=45 TO 99:A$ も =" "EiB も =" "7":iB=9:FOR J 
=1 TO 8:A=ASC(MID$(CGPAT も $( 二 ) 。J, 1 ) ) : A や も =A$ 

+CHR$ も S(A OR B/2 ) :B$=B$+CHR$S(A):B=AENEXT:D 

EFCHR も ( ! ) =A や も や +A$S+B$: NEXT 

629 DEFCHR$( 42)=RIGHT も (CGPAT も (48) ,24) : BE 
EP:PAUSE 1:BEEP:PAUSE 1:BEEP: RETURN 

639 CGEN 1:COLOR 7:CLS:RESTORE 379:READ 

D$ も :XF=3:YF=9:GOSUB 319:RETURN 


一 変数 リス ト > MKvw タ メージ ・ 140 面 フ リア 判定 ・ 480-620 PCG 設 定 
AD( )…… キ ャ ラフ タ ア ドレ ス : FF…… ポ ピー の 点滅 フラ ブ  : 150 ゲー ム オ ー バ ー 判 定 : 630 タイ トル 表示 サブ 
HM( )…… 各 方 向 の アド レス 増 * UN-…… 落 下 フ ラブ ・ 160 頭 ぶ つけ サブ ・ 較 チ ェ ッ クボ イン ト 
減 値 5 WE ポピー ピ つ の まう ちか 00 ダメ ー ジ サ プ ・ 。 お お つと 、 ハ イス コア 登録 を 
M1$S,M2$…… ミ ュー ジッ フク ・ 判定 用 ・ 180 メロ ン 食 べ サ プ ・ つけ る の を 忘れ て し まつ ただ 。 ヒ 
デー タ > 5 ギー 入力 ・ 190 毒 キノ コ 食 べ サ プ  : マ な 人 は つけ まし よう 。 マ シン 
KJ…… テ ン キ ー ガ ジョ イス テ : XY,XF,YF…… ス テー ジ 作 成 ・ 200 パイ ナッ ブル 食べ サ : 語 は 使 つ て いな いけ ど 、 OUT 
ィ イッ フ 用 了 ・ 命令 が ある の で 注意 。 の 面目 は 
ST…… ス テー ジ ・ AB.AS.BS……PCG 設 定 用 : 210 面 ク リア ・ ムズ いけ ど 絶 対 ク リア で きま す 。 
CA…… キ ャ タビ ピー の 数 ・ 田 プ ログ ラム の 説明 ・ 220 スコ ア か ら ダ メー ジ : が ん ば り ま し ょ よう 。( パ ンプ ) 
つじ C…… ズ コア ・ 30 キー ガ ジ ョ イス ティ ・: を 引 ご 
M…… 向 き 反 転 > ッ ツク か ・ 230 キャ タ ピ ー や られ サ : 
HC( )C…… キ ヤダ タビー の 顔 の ・ 40-- 50 初期 設定 プ : 
キ ギラ ・ 70~-100 キー 入力 、 移 動 、 落 : 240 ゲー ム オ ー バ ー 
MEJME ら … コー ジッ ソ ク 。 下 判 定 ・ 260-320 面 作成 
メラ の ・ 110-120 落下 9302420 面 デー タ 
5 の 雪 ・ 130 ミコ ー ジ ッ ク の ・ 440 一 460 初期 設定 


5 上 -EOUNDER-MALLーーーーーー 


一 By-Y. MIYRUSHIRD. 一 軒 
> 間 ー 3 


| 


了 和 ee 


浴 


*ーーーーー 一 ヨ キ や ゅ チイ ー 1 ーーーーーーーーーーーー 一 


il 人 ムーZgGFEEDOIFLAY フ ENM も ="CODE " 
ーーーー 一 キキ ド だ ゅ エイ で ーーーーーーーーーーーー 一 
MCAGMN5 GUGUB11008 コロ = ニ 0I MM=OI リロ =1 
ーーーーー カド メー サワ セイ ーーーーーーーーーーーー 一 
TNIT "CRTI "iCLS 
ECULUR7I LUCATE19。17:FRINTCHR ま (9 の ) s 
FOUR エ =1 TH 100 
ロニ RND* スプ +1 5 ロニ RND* 1 ワ + ォ ジ 
D=6』 も = リョ TF エ / で = テニ 1\2 もげ いい " 
ITF ! 了 > ミニ B ワ ー リ じじ = リ " 柱 り 5D= ニ 2 
TF エミ 1 の 01 一 じ も =CHR 和 ま (⑦6) 5: D=1 
IF SCRN ま も (QBE。1)= リ "ELSE 17O 
CULURD:LUCATEA』 BsFRINTC ま * 
NEXT IiCULUR4:LUCATEO』 SE4EPRTINT"* BDUNDER MRLL 
ae 1 ヨ 。S3s COLUR1 FRTNT | て き - 区 迷 党 ヨ 詳 1i 
ーーーーー = ヨ キ だ ゅ チイ 3 ーーーーーーーーーーーー 一 
メデ 19』Y= テ 1 アミ ロ =O 
n ロ ニーRND* う の 3 日 ニ 1』Z ニ 1: FLAY "リー ビラ ー ロ ミーBRー5R " 
OMBIUBSOMS BHT ミミ O 
ーーーーー トウ テン サナ ト ~。 ーーーーーーーーーーーーーー 一 
CULUR 7Z プ 。OI TF HG H= 
FRINT _ USING " 還 BCURE = 祝 柱 提 柱 韻 提 H ロ エーS じ CURE =: 揚 六 韻 祝 韻 提 
2 つや MAN 一 ーーーーーーーーーーーーーーーーー 一 
X メ 1 ニーXsY1= ニ Ys T 和 ま = ニ INEEY 和 ま (O) 
メニ ( 工 あ "大 りう) 一 (エリ 大 の ) 
YG ニ (上 生ま リ 遼 リ )ー(T 生 りり 本 の ) 
IF T ま =" "UTU7Z フ アロ 
メデ メオ X で YY テモ Y+ す YO 
TF XXO X= ニ 3 ウ 9sFLAYM ま ELSE 1TF X: さ の X=OgFLARYNM ま も 
IF YE1 Y=22sFLAYM も ELSGE IF Y:22 Y=1sFLRYM も 
F ま =SCRN 和 ま (X』Y。』1) 
IF 本 = じ ビ HR も (96) X= ニ X メ ーXG』 ミ Y マ ミニ YーY つ 
IF F ま =" い KO OUR F ま = リリ ELSE 510 
ーー デー ニーー MALL PUSH ーーーーーーーーーーー 一 
メニ メ + ナ XCR Y ニ Y+ オ Y で 
IF XSO_UR XE う の DR YE1 OR YES22 BDTD 48O 
IF _GCRN も (XY。1)=" ELSE 4 ヨ 0 


* パ 攻 生 迫 抹 衣 衣 広 表 二 計 寄生 本 BY Y 上 HH *"』 


MISSs 拉 "35saHiNMiRETURN 


CULOUR6I LUCATEX』YsiFRINTF' ま 』: メニ メーX2 ョ Y= ニ YーY2EPLAY"+CO"E BDTD 510 


メニ メーX ご s Y= ニ YーYEs CHLHRGELHUCATEX。YsFPRINT" "> 
FLAY"ーCOTSLDCRTEX』YsFRTINT" "EX ニ メーX 人 Ss Y マ モニ YーYG 


ITF XSES SO_ DR YS >O LODCATEX1』Y1sPRINT" "』 
COLOURZ7ELUCATEX』YsFRINTCHR ま (99) 
IF F ま = リ "W"OUR F ま =" 栓 "BUDTD650 
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LAS 
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の mm の いき 府 ご 完 抱 さ 寺 巡 
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*m 
に = 
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ン 
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NLmSN で NT 
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に こつ 
て つ 
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m SW erO77 
融和 半ば ek の 


(の 吉 ー みき) … 
た 
っ YY 


NN 
9 


40 
らら 0 
ら 60 
7 の 
1 こ =【6) 
59 
600 
61O 
620 
30 
4 
に pl] 
660 
ら 670 
6BO 
690 
7O0O 
メ より け 
フジ 0 
73O 
プア 40 
9 
プ 6Q 
77O 
7 ヨ Q 
7 
00 
B1O 
0 
B さ 3 
日 40 
B5O 
60 
B7O 
BBQ 
8B9O 
900 
1 
9 で 
うけ 
9400 
5 
6 
7 
7BO 
990 
1000 
101O0 
102O 
1 の 3O 
1040 
1050 
1060 
1070 
10 ヨ 0 
109O 
1 100 
1110 
1 1 で O 
1 1 3O 
1 140 
1 150 
1 16Q 
1170 
1 1 ヨ Q 
1 19O 
1 で OO 
1 で 10 
1 2O 
1 つう 3O 
1240 
1255O 
1260 
1270 
1 日 り 
1 290 
1 る O0 
1 る 1O 
1 2O 
1 る 3O 
1 さ 40 
1 くら 
1 る 60 
と る プア の 
1 3 る 0 


"ーーーーー ALIEN 一 ーーーーーーーーーーーーーーーー 
QA2=Qi EZ= ニ BZ テー7 iA1=SGN (メー 人 ) :B1=SBN (Y-BB) 


IF Aa1=OOUR EB1=OELSE ITF Z=1GOUTOUSBO 

じ ま =SCRN ま (TA1 。B』 1 ) s IF じ ま = リ "OUR じ ま = じ CHR 和 (99) DR じ ま = リ 柏谷 =R+R1EFLAY"+BO" 3 GUTU590 
まま =GCRN ま も ( 全 。 B+H1 。 1 ) : TF も = "OHR まま = ビ HR 和 まま (99) ロ R も = リ 欄 " 昌 =B+EB1EFLAY"+EOT 
MoE sBSsFRINTU iC じ ま = ニ SBCRN ま (RE 1 ) 


COUL s LUCATEA。 BsFPRINTP Wi 
まだ じ *= CHR* ( ら 9) BDTD65O 
IF じゃ =" 提 "ロロ = コ +2O FLY リー ロ O『" 
SSMs GUTOU 330 
ーーーーー ラレー! ーーーーーーーーーーーーーーーー 
CDULURSILDCATEX』YsiFRINT リ "3EIFUR 1=5 TU 1005 FDR 9=255 TDOSTEF-64 
PUEE &HCZC』 ゴ 』 TE CALL&HCSGS NE XTJ』 エ 
LUCATEXaYEIFRINT" "aiBEEFO 
M=M+ 1 3 BDSUB さ OOI JF MK3 LDCATEX。YiFRINT" "agLDCATERaBsFRINTV "EE GUDTU デ 4 は 
ツー CPKS2tktyt 2 ーー ムー ーー ーーー ニー テー こ ーー 
CUDNSODLE OO 4 
FAUSE1oOs CDLDR7 OiCL5ILUEATE12。1O5FUR エ =1TOU14 
FRINTMID ま も ("% GAME  HVER *"aTa1)isPAUSEEENEXTT 
LODCATE15』12sFPRINTUSING "SCURE : 提 祝 析 韻 欄 "&GITF HGS H=5S 
LHCATE 1 呈 。 14:PRINTUGTNG "昌男 1 一 は ロミ 柱 柱 柱 柏 "5 
DS B5RO-B4- 人 7ーB7RーB5RCR" 5 BDTD12O 
ーーーーー ミサ ゴイ ゴ 用 ーーーーーーーーーーーーーーーーーー 
MM= ニ OX ニ 19gY= ニ GEX1=O5Y1 テ ー1 5 CULOR 1 
X コ = ニ Xs Y コ = ニ Y』 X ニ X+X1 8 Y= ニ Y+Y1 
IF XXODR X23 ウ OUR YE1UHR Y>S2X=XーX1 3 Y ニ YーY1 5 BUDTD10ZGO 
F も =GCRN も (X』 Y。 1 ) 5 BEEF'O 
IF F ま =" 便り ロ = ロ + さ OOgFLAY "CE3EBC5" 
ITF F ま =" 析 "ロロ =OKPLAY リー ビー 埋 ビ ー ビ ー 柱 じ " 
IF PP ま = リロ = ロ +10gFLAY "+ 柏 BO" EX1= テ ーX18Y1= ニ ーY1:iSMRF XX1。Y1: BDSUE さ OO 
IF まま = いい "= ロ +T10sFLAY"+ 柏 BO" GMAF_X1。Y18GUSUB3QOO 
CULDR1:LUCATE XSEaY2EIFRINT の の 
IF F も =CHR ま も (96) GUHTO 909 
IF F 和 ま = じ HR ま (⑦9) MM=M+18 FLAY"ー ビ ミ + 提 5"』 エト NM=3 BOTO 700 
CHLOR1 iLHCATEX。YsiFRINT "W's siBEEF1 3 GUTOU7 ヨ QO 
COULOUR2S LUCATEX』YsFRTINT"* "is ロロ = リ 0+ す 900 
FR IT=OTUS5S5s FUHEE&HCZD。 Ti CALL&HCSGENEXTT 
M=M+1: TF MKU BODTO 7BO 
RNN 生 の 0 の ーー で で やつ mt 
FLAY "EZ2DCEDCEDEDEDCEG+C7 "55=5+0I GDBUE3OO 
C ロ LR 7 ア 』 1: CONSHLE 5。 10。 SO CLG 


FRINT" 。 ※ すす 2E-) セイ コロ ー 11 % 還 
FRINTUSING 『" BUNU: 柱 柱 柏 拉 村 FTGIVsH 
FRINT "本 すす メキ トト ウー 1 0 8 8 ロリ + 1 


FURI=10OTDOSTEF-1 jiFDRJ=255TUOSTEF-64: FUEE&HC7C』J』 TEEALL&HCSGI NEXTJ。 15 BEEFO 
INIT"CRTI "IiBEEFEPAUSE10 

9 1 4O 

ーーーー 一 せ の 2 全 | Em JP ゴキ ーーーーーーーーーーーー 

FLAY"ーDZ7RO-D6RO-ーD4RO-D フ アーF ム 6 ムーE4ROーE ム 6ーD4RO 一 D ム 一 柏 ビオ ーD9 リ 5 MM+1 8 GHGUE10 
CDNSULE5』5』1O』 Os CULUR7 ュ 5 じ LS 

PRTINT" サフ セー 9PTT 1 本 

FRINT" NO BUNUS ! 醒 

FRINT" by た 二 

FURI=OTD1OOIFURJ=OTUS55STEF64: PUREHC7 プ ビ ょ 。』 TEALL&HCSSs NEXTJ。IEBEEFO 
IF ME GUHTH 990 ELBE ZO00 

"ーー ーーーーー ダイ トル 一 ーーーーーーーーーーーーーーーーー 

INIT"CRTI "ECLS 

FUR 1!=1 TO 5OILOUCATE _RND* う 9』RND* 全う 

CHLURRND*K6+1sFRINT" "igNEXTI 

RESTDRE: FUR1= る TUB: RERDQ ま 3 CDLUR エー ビデ 

LCATE5。 TE PRINTA ま も 』 ENEXTI 

DATA" rm ーーーーーー つ ローーー コ ーー に つ コ ココ 

DATA" コロ ピュ コ ュ ュ や ロロ ュ r 1 ロロ 

DATA"1 1 IIIIIIIII ビ ロロ ーIITHII I 


DATA" 1 レコ LJLLLLLLLJL し は び し よ 4 よ 


DaATA" し HADE_EY Y.MIYRUSBHIRUD。 

DATA" 。 レーーーーーーーーーーーーーーーーーーーーーーーー リ 

LOCATE7』。103 CDLUR7EFRINTCHR ま (97) 9 、。、。MRN  " 

LUCATE7。 12: CHLOR さ 5 FRINT"W。、.. 人 LTIEN" 

LODCATE7』14:CDLDR1 FRINTCHR ま (56)"。。、UFD  『" 

LHCATE7』 16: CHLHR6EFRINT リ デー 。 MALL 

LODCATE7』 18: CDULURSEPRINT" 菩 。。。 BUDNE" 

FURI=1O0TO1 ヨ GTEFSI CULOR7 

LUCATEB』 IiFRINTSCRN ま (B。T。B) siNEXT1 

LUCATE2Q』。11sFRINT "EEY FUNC." 

LOCATE2O』13 さ IPRINT 牧 GOV 。 硬 "5 

LCATE2O。14』FRINT 柏 O" 詳 一 ト " 5 

LODCATE2O』15:FRINT 柏 O" 本 7i 

LUCATE2O』17:FRINT" [SFC]。 。 OR ! 

PLAY "CSEBCEBCE-ACE-A ビ CE ビー ビー ドー ロビ ヒー ビー ビー ドー 人 ロー ローB じ ヒア 

FUR 1I=O TO 7sCULOR 1 ょ アーTELOCATE15。2 さ RFRINT"HIT ANY EEY _ 178 
IF INEEY ま =" "NEXTIGOTOD 1340 

INIT"CRTI "iCLS 

LDCATE10。1OIPRINT "< BRME START ! 2"3FRINTTAB(10)" 本 昌 Y YY.HIYRUSHTRD." 
PaUSE10s RETURN 


U……UFO の 数 


A…… エ イリ アン の X 座 標 
B.… エ イリ アン の Y 座 標 
A1.B1 …… エ イリ アン の 進行 


AB の 


Y…… 自 分 の Y 座 標 
9 AE 
XY らい 
HH…… ハ イス コア 

(Oo ポー ナス 

W…… 撃 墜 し た UFO の 数 
コージ シ ツン ツ デ ー タ 


P$…… 自 分 、 ミ サイ ル の 進行 
方 向 に ある キャ ラク タ 
エイ リア ン の 進行 方 向 


で す 。 UFO の 数 が 増え る と 、 
が パニック し て じまい ます 。 エ 
イリ アン の 動き が 速 す ぎ て 、 ゲ 
ー ム が 楽し め な いと いう 人 は 、 
560 行 の AA 十 A 1 を AA 
+A1 *RND (1) wRND 
(1) に し て 、570 行 の B= ニ B 二 1 を 
を B= ニ BB1 w RND (1) 

* RND (1) に し て みて ぐだ 
さい 。( エ イキ チ ) 


に ある キャ ラク 
ZZ…… エ イリ アン の 進行 方 向 決 
定 

較 プ ログ ラム の 説明 

10~ 80 REM 文 

90-120 初期 設定 1、 ど 
130 一 240 画面 作成 

250280 初期 設定 さ 
290-310 スコ ア 表 示 
320<420 キー 入力 
430-490 カベ を 押す 
500-~530 自分 表示 
540-630 エイ リア ン 物 動 、 表 
示 
ミス の 処理 
690<750 ゲー ム オ ー バ ー 処 理 
760-910 ミサ イル 秘 動 
910-1000 作戦 成功 
1010 て 1080 作戦 失敗 
1090ー1380 タイ トル 表示 
圏 チ ェ ッ クボ ポイ ント 

メチ ャ ンコ お も じ ろ い ゲー ム 


記 向 
… エイ リア ン の 旧 座 


640 一 680 


ら @ の @ @ @ の @ @ @ @ @ @ @ @⑥ @ @ @⑥ @⑥ @ @⑥ @ @ @ @⑨ @ @ @ @ @ ⑨⑳ @ @ @ @ @ @⑥ @ @ @⑨ ⑨ 9 @⑥ @ @⑥ @ @ @ @ @ @ @⑥ @ 9 @ あぁ @ @ @ 
ee eo ee eo oe eeee eeeeeeeeeeeeeeeeeeeeeeee ぁ se eeoeo ee ee る @o eo @e eo @G oe の ら の の の @ の 


1@2 CLR:DINHITS(G).MI ま (4) 


ら g GOSUBGG の @ 

うさ = ロ : ドー1: =3 

4 の DEF KEYC8 )=POKE $95 ら , 166+ 

5 PR INTCHR (6) 

6 _ FORTI=1TO5: FOUR し = ウロ T ロ 4 

プ @ IFT=L+ 1THENCURSOR [ , し :PRTNTRIDS("SPRCE" , 1 , 1 ) 

8@ NEXTL, 1 

qq CURSORB, 避 : FOR エニ 1TOG: PR INTTRBCG):RIGHT$(T ま CT), 16): NEXT: GOSUB 了 ウロ の 


1 ビリ KE 5 うら 6 

11 の 9 CURSORO.6: PR INT" を 
1 ご @ UNRGOSUE ご 4 の, ご どの の ご 4 の ロロ ご どの の ご 4 の :「 モ ウド 1 

1 づ ロ GUSUE ご ご の 


14g9 FOUR エニ 1 TUR※3 
っ ら ウ 9 [1=INITCRNDC 1 )※ き 6 う + す 己 : ご テモ INTKCRNDC 1 ) う ※※1 ロ オキ: IFCCHRRRCTER ま (CT1 1 どう) く >! 
ER$(T1 1 ど +15)= ニ CHR$( 3 の ) ) THEN 15@ 


"ラオ (CHRRRCT 


16@| CURSORT 1 . 16 FRTNT "ロリ: ト HIEXT 

1Y ら g RE トド 壮 証 雇 議 ain 

18g@ ト FTUS EC" CGDRERFRGR ロ RE ドド + す ビ ド + す D ロ ド + ビ ドサ オド + す ロロ R ド す 哲 ビ + ピ ドド ": ド 人 

1 コロ 「T 中 ニ リロ ウロ ウロ dg の の" 

ご の の USRC ま BB の 9): IFC YS 26 う (CHRRRCTER$S(X。 マオ 1 う =" 較 ')THENIY= テ ザー1 


IFCBS 26 2 て (CHRRRCTER ま ( 各 ロビ + 1 )=" 較 ')THENE ニ = ビー 1 
IFCD く 26 うま (CHRRRCTER ま (CD ロ + 1 )=" 較 ')THEND= テ ロー 1 
の CURSOR5S,」 319:PR INTMS(K ): KK ニ K+ 1 : エ FK=5THENIK= 1 
GT ト NE ビ Q さ 4。 ul: ロ Nー( LC 2B53 )G ロ TO ロ S 1 中 


SQ 


ロ N-CY>16)GOT0 き 1 の 


IFCHRRRCTER ま (※,」 ヤ イオ 1) う = リー "THENIFCCHBRRCTER ま て (※ー1,」 YY+ す 1 ) う = じ HR ま (③1 うう +( CHRRRCTE ド R$( 1 


UTU て PTOFOFOTD 


(仙一 -]-d 二 要 よ は GDー 
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CURKSOUR1 の 9, 11:PRENT" GFTE OUER 


MUSIC"D3E5F つ D4 じ ーB ビ ラー ロー ロー ビー ロー ビー ビー ビラ ーDーC5R9" 
IFS >UTHENIU=S: CURSOR 1 の 9, 14: PR INT"You set NEM RECORD !":MUSTC"ESRFRGRERFRGRFRG 
B+C+D3" 


CURSOUR14. ら 9 :F ビ RINT"HIT SPRCE KEY" 
GETK$: IFK$="E" THENPOKE $ コ 5S ど ら , 166 : END 
IFK ま =" "THE ト ご @ 

GU TB スロ 

CURSUR 1 ご , 11:PRINT "CONGRRTULRT TONS 
ER+C+D+ キ ヒビ +F+G4R" 

BUSUE'T ウ ウロ: GOUTOB ど ご 

RE トド 1 還 証 雇 較 !achinE 1 an ヨロ a 可 ら data 


"KUSTC" DSEFGEFGRFGREGRB+TCFG ロ ロビ + ビ + ロ キビ ド + ヒ 


哲人 選 , ど ご 98, ご 1 1、 ど 3 ど ,。 33 。 6 どら 09d、。 1『 げ 、 ご の 89, ど ご @5、 1 CO 。 つき 。 (ご 689 
折 I 邊 1 8 の OO、 どら 、 や 3 は 。 1 で 6 、。 33。 1 . こ 08。 1, 28 の. す 5 。 コラ 
DQT ロ 6,. ら 2 の 9, 17,。 56. ら どら 9 , ら G9 ら , 63, 176, 33, 7/, ど の 9B, 17,。 ご, どの 8, ご の 5 ら , 63 
D ロ T 販 4 つい 、 6 80B。 1 て 。 ら 8. ご どの 5 B3、 1 PB 6 。 4 ご ご 】 1 88 , ど 1 , 5) 
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CHRRCTERS": PR TNIT 
NMR" EPRTNT 
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141< っ 16| " 


"30 きこ!)(8] に 


TEIMP ロ 7 : US TIC"F3GGFGFGEFEDEFGR+CB+ ビ +D5" : GOSUB ら の の 
CUES ロ E ら , ら 1 : PEINT 「 還 証 較 HIT GaNY KEY 
GE TK ま : IFK ま =" "THEN ア 6 の 


詳 数 リス ト ・ VI……MAN,GAIO の Y 方 向 増 ・ 460~- 550 GAIO(② 物 動 
TS( )…… タ イト ル 文字 分 : 960 クッ ルー 

SR 4 Rn が NX コア ・ 590- 600 BGM 

R…… ス テー ジ 数 ・ MS……BGM ・ 6090 /20 スコ ア 表 示 
M…… ド MAN の 数 WioL ニダー ・ 7/40- 810 書類 を と つ だ と き 
T-…… 書 類 を と つ だ 数 : MU…BGM 制 御 の 処理 
X……MAN の X 座 禁 ・ 較 プ ログ ラム の 説明 ・ 640- 690 MAN が つか まつ 
Y……:MAN の Y 只 標 ・ 10 40 初期 設定 だ こき の 処理 
E……MAN の XX 方向 増 分 : 50 160 画面 表示 ・ 900~- 960 ゲー ム オ ー/ バ ー 処 
A……GAIO(1) の X 座 標 : 170- 190 MUSIC 等 信 
B……GAIO(1) の Y 府 :・ 200~- 230 エレ ベー ター : 1200-1210 5 ら 面 フリ ア 
G……GAIO(1) の X 方 向 増分 : 240~- 270 穴 ほり 、 穴 うめ  : 2000-2130 マシ ン 語 書き こみ 
C……GAIO(② の X 座 標 ・ 310- 350 _ MAN 衝動 会 デー タダ 
D……GAIO(② の Y 座 標 ・ 355 タイ ム 表 示 ・ 2200-2570 画面 デー タ 
H……GAIO(② の X 方 向 増 分 : 380- 450 GAIO(1) 物 動 ": 2600-2780 タイ トル デモ 


19 KEY6, "screen9"+CHR$ も ( 1 )+CHR も (13) 

29 CLEAR299 , &HE3FF : SCREEN1 ,2:WIDTH28:COL 
OR 4,1,1:KEYOFF:DEFINTA-R,T-Z:DEFUSR= &HE 
499:DEFUSR1 =&HE417:S1=19999 


39 IF PEEK(&HE453)=255 THEN POKE&HE453,9 
49 "ーーー- て いき ~ へ ーーーー 

59 GOSUB1 429 

69 '---- demO ヽ \ ---- 

79 GOTO 1219 

60 “ー ニ ニ ー… じ し よき < 1 ご ニーー ニ 

99 RN=1:GE=1:LE=4:SC=9:FOR 1=1 TO 3:AA(I 


)=9:NEXT :GOSUB1116 

199 FOR 1I=@ TO 6:MS$(1)=MID$( "abcdefg",! 
+ 1 ,1 ) : NEXT 

119 '"-ーーー し ょ き 2 ーーーー 

129 R=RND(-TIME):00=INT(RND( 1)*4)+1:TI=3 
99:Q=9:X=16:Y=24:FOR !=1 TO 3:AX(I)=224: 
AY(I)=168:A(I)=9:TM(I)=9:C(1I)=-(15-AA(I) 
\2)%※(AA(I)<>5) :NEXT :PLAY "V14t299164" 

139 FOR 1=5-LE TO 4:PX(I)=16+29%(T-1)-(4 
-LE ) x29: NEXT 

149 GOSUB999:TIME=9 

159 '--- MAIN 
169 TM=TI-TIME/69:LOCATE19.1:PRINTRIGHT$ 
(STR$(1999+TM) ,3):IF TM=9 THEN 1139 

179 XX=X:YY=Y:A=STICK(9) 

189 ON (A=1)X(Y>24)+(A=3)x(X く 224 ) 2+(A=5 
)%\(Y<168)x3+(A=7)X(X>16)x4 GUTO 299,210, 
229,239 

199 P=1:MU も =" "EGOTO 319 

299 Y=Y-16:P=4:MU$="o5cd":GOTO 249 

219 X=X+16:P=3:MU も ="o5GD":GOTO 249 


220 Y=Y+16:P=1:MU$= "oO5dC" :GOTO 249 

239 X=X-16:P=2:MU$ も ="o5dG" 

249 V=VPEEK(&H1899+X/8+Yx4 ) 

259 ON -(V>223)-(V=233 )x2-(V=249)-(V=46 ) 
%4 GOTO 289.299 ,399.,279 

269 GOTO 319 

279 SC=SC+19:GOSUB1999:LOCATEX/8-2.Y/B:P 
RINT" ":MU$="o7edc":GOTO 319 

289 GOSUB 719:GOTO 319 

299 X=XX:Y=YY:MU$ も ="":GOTO 319 

399 PUT SPRITE 9,(X、Y) ,12。1:BX=X/8-2:BY= 
Y/8:GOSUB 699:GOTO 1139 

319 PLAY"xmu$ も :":PUT SPRITE 9,(X,Y) ,19,P 
329 し L=L+1:IF L=4 THEN し =1 

339 IF TM<TM( し ) THEN TM(L)=9:BX=RX( し ) :BY 
=RY(L) :GOSUB690 

349 IF A(L)=1 THEN IF TM<TA(L) THEN A(L) 
=9 ELSE 569 

359 AIl(L)=AX(L):A2(L)=AY(L) 

369 IF AA(L)=3 OR AA(L)=6 THEN M1=INT(RN 
D(1)X2)x16+16 ELSE -M1=16 

379 IF AA(L)=1 OR AA(L)=6 THEN M2=INT(RN 
D(1)x2)x16+16 ELSE M2=1i6 

389 ON (RND( 1 )x6+4 )MOD4+1 GOTO 399,499,4 
19,429 

399 MX=SGN(X-AX(L し ) ) :GOTO 439 

499 MY=SGN(Y-AY(L) ) :GOTO 449 

419 MX=INT(RND( 1 ) x3)-1:GOTO 439 

429 MY=INT(RND( 1 )x3)-1:GOTO 449 

439 AX(L)=AX(L)+MXxM1 :GOTO 459 

449 AY(L)=AY(L)+MYxM2 

459 IF AX(L)<16 OR AX(L) >224 OR AY(L) く <24 
OR AY(L)>168 THEN 599 


いま ( 1 ) = "「 較 証 還っ で < や < やや て や で らち < うう < ら で か < っ < な > っ < 導 証 証 菩 "= (2 ) 三山 も ( 1 ) iM 生ま ( そ ) 内 ま (1 ) 
ーー ーー M 
CURSORX, Y: PR INT" 村 " : CURSORR,B: PRINT"x" CURS ロ RC, D: PRINT"x" 
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2800-2850 変数 初期 化 
田 チ ェ ッ クボ ポイ ント 則 
前 回 の TOMkun と 内 容 が 少 \ 

し 似 て いる よう で す が 、 け っ つこ の 
つう 遊べ て 楽し い ゲ ー ム で す 。 6 
だ だ 画面 が 単調 な の が 気 に か り 

か り ま す 。 自分 の オリ ジ ナル 面 
を 作 つ て みて も 、 お も し ろ い と ゃ 
思い ます 。 ま だ 、 あ る 程度 、 面 ら 
が 進ん だ ら 、 一 時 的 に エレ ベー レレ 
ター が 逆 回 転 す る よう に し て も は 
いい の で は な いか と 思い ます 。 紹 
(エイ キチ ) の 

ジス 

2 

を 


469 V=VPEEK(&H1899+AX(L)/8+AY(L)x4) 

479 1F ((V=249) OR (V=232 ) ) AND ((AA(L)= 
2) OR (AA(L)=6) ) THEN 519 

489 ON -((V=248) OR (V=249) OR (V=232 ) ) - 
(V=233)\2+((AA(L)=5)xX3+(AA(L)=4)x4)x(V<2 
23) GOTO 599.529,.539,549 

499 GOTO 559 

599 AX(L)=A1(L):AY(L)=A2(L) :GOTO 568 

519 LOCATEAX(L)/8-2.AY(L)/8:PRINT"  ":LO 
CATEAX(L)/8-2.AY(L)/8+1:PRINT"  ":GOTO 5 
5 

529 PUT SPRITE し ,(AX(L) ,AY(L) ) 。C(L) ,5:BX 
=AX(L)/8-2:BY=AY(L)/8:TA(L)=TM-49:A(L し )=1 
:GOSUB 699:Z=4:SC=SC+((AA(L)+3)x109-TK ) 1 
9 : GOSUB1999:GOSUB879:GOTO 559 

539 LOCATEAX(L)/8-2.AY(L)/8:PRINT".":GOT 
0 559 

549 IF RND(1)<.4 THEN C(L)=C(L)+7+(C(L) = 
7)x14 

559 PLAY"O1"+"xmS$ も (aa(1))j" 

569 PUT SPRITEL, (AX(L) ,AY(L) ) ,C(L) ,5 

579 IF A(L)=@ AND ABS(X-AX(L))+ABS(Y-AY( 
L) ) く <24 THEN C(L)=C(L)-(C(L)=9)x13:PUT SP 
RITE し L,(X,Y),C(L).5:GOTO 1139 

589 GOTO 169 

599 '---- は ~ く は つ し ょ り ーーーー 

699 V=9:BB=9:B1=9:B2=9:SOUND7 ,247:RESTOR 
E 1849:FOR I= TO 13:READ w:SOUND I,W:NE 
XT 

619 FOR J=-2 TO 2 STEP2:FOR !=-2 TO 2 ST 
EP2 


77 


る 
示 


OF 
LM 


ぐ 全 普 SS テ ー す へ ツ > 


うべ %」 


rl 軸 


r ペ プ デ ヨー つらら の 一 の 〇 の で 


mw て いひ ぴ ンマ テー の いとい ) 庄 


ィ 


に !) 


ぺい いざ ロ 


へ 潮 


ペー 2 溶 
テー 


fi 


い 


629 IF BY+Ii>2 AND BY+I<22 AND BX+J>-1 AN 
D BX+J<28 THEN V=VPEEK( &H1899+BX+J+(BY+I 
) x32+2)ELSE660 

639 IF V=248 THEN BB=1:GOTO 669 

649 IF (1I<>9 OR J<>9) AND V=233 THEN B1= 
J:B2=I:GOTO 666 

659 IF V>223 THEN LOCATE BX+J,BY+I:PRINT 
" "iLOCATE BX+J.BY+I+1:PRINT" “" 

669 NEXTI,J:SOUND 7,.248:IF BB=1 THEN VPO 
KE&H291F,&H91:GOTO 1139 

679 FOR !=1 TO 3:IF BX=RX(I) AND BY=RY(I 
) THEN TK=TM( IT)+15-TM:TM( 1 )=9 

689 NEXT:IF B1<>9 OR B2<>9 THEN BX=BX+B1 
: BY=BY+B2:GOTO 6 

699 RETURN 

799 '′ -ーーー きゃ ら いと ~ う =ーー 

719 F1=X/8-2:F2=Y/8:FX=F1+(X-XX)/8:FY=F2 
+(Y-YY)/8:Z=-(V=248)-(V=241 ) 2-(V=232 ) x3 
-(V=226 ) x4 

729 IF FX<9 OR FX>26 OR FY<3 OR FY>21 TH 
EN IF Z=4 THEN 829 ELSE 899 

739 F=9:FOR 1I=1 TO 3:F=F+(FX=AX(I)/8-2)※ 
(FY=AY(!I)/8):NEXT:IF F>9 THEN 8 

749 V=VPEEK( &H1899+FX+FYw32+2 ) 

759 IF V>223 THEN IF V=233 THEN BX=FX: BY 
=FY:GOTO 699 ELSE ON Z GOTO 899.819.899, 
826 

769 U=(FX=26)%((FY=21】1)x4+(FY=3)x%3)+(FX=9 
)%((FY=21 )※2+(FY=3) ) 

779 IF U=9 THEN MU$="o4ec":GOTO 849 

789 IF Z=1 AND U=OO THEN LOCATE F1,F2:PR 
INT" 。 “":LOCATE F1.F2+1:PRINT"  ":PUT SPR 


ITE9 ,(X,Y) 19.1:SC=SC+ INT(TM/2 ) 109:GOSUB 
1999:GOTO 16269 

799 MU$="o7gfed":LOCATE F1,F2EPRINT" の 
LOCATE F1.F2+1:PRINT" 
856 


":GOSUB 879:GOTO 


899 X=XX:Y=YY:MU も =" "EGOTO 856 

819 IF V=248 THEN VPOKE &H291F,&H91 :GOTO 
1139 ELSE MU$="o6ao7a":GOTO 846 

829 MU$="o7a":Z=5:SC=SC+ 19:GOSUB 1999:Q= 

Qr1:IF Q>3 THEN Q=1 

839 RX(Q)=F1:RY(Q)=F2:TM(Q)=TM-15:FX=F1: 

FY=F2:X=XX:Y=YY 

849 LOCATE FI.F2:PRINT"  “":LOCATE F1.F2+ 
1:PRINT"  ":LOCATEFX .FY:PRINTG1$(Z):LOCA 

TEFX,FY+1:PRINTG2$(Z) 

859 RETURN 

869 '-ーーー わ ー ふ ? ーーーー 

879 CX=(INT(RND( 1)*12)+1)x2:CY=(INT(RND( 
1)x8)+3)x2-1 

889 V=VPEEK(&H1899+CX+CYx32+2):1F V>223 

THEN 879 ELSE LOCATE CX,CY:PRINTG1$(Z) : し 

OCATECX ,CY+ 1 :PRINTG2$(Z) :RETURN 

899 '---- SCTeGT --ーー 

999 FOR !I=9 TO 3:PUT SPRITE !,(9.299):NE 

XT 

919 LOCATE 11.9:PRINT "SCORE":SPC(2)5 "TIM 

E"iSPC( 1) 1 "STAGE" 

929 GOSUB1999:LOCATE 18,1:PRINTTIiSPC( 2 ) 
iRIGHT$(STR$ も (1999+GE ) ,3) 

939 FOR I=5-LE TO4:PUT SPRITE IT+4.(PX(I) 
9).18.1:NEXT 

949 A=USR( 9 ) : VPOKE&H291F、&H71:FOR !=9 TO 
3999: NEXT:LOCATE9 .3:A=USR1(9) 

959 FOR Z=4 TO 1STEP-1:FOR !=9 TO 2+(Z=1 
)*2:GOSUB879:NEXTI ,Z 

969 FOR !I=1 TO 3:PUT SPRITEI .(AX(T),AY(I 
) ) ,C(I),5:NEXT 

979 PUT SPRITE 9-LE,(9.299):FOR !=1 TO 2 

4:PUT SPRITE 9.(16.!),19.1:NEXT 

989 IF LE=1 THEN RETURN ELSE FOR J=6-LE 

TO 4:FOR !=1 TO 29:PX(J)=PX(J)-1:PUT SPR 
ITE J+4,(PX(J),9) ,19,2+(1=29):NEXTI。J:RE 

TURN 

999 '"---- SCOTG -ーーー 

1999 LOCATE 11.,1:PRINTRIGHT$(STR$( 199996 

999#+SC ) , 7 ) : RETURN 


1919 '--- C1eaAYT ---- 

1929 AA(1)=AA(1)+1:IF AA(1)=7 THEN AA(1) 
=AA(1)-(6-AA(2) ) : AA(2)=AA(2)+1 

1939 IF AA(2)=7 THEN AA(2)=AA(2)-(6-AA(3 
) ) :AA(3)=AA(3)+1:AA(1)=AA(3) 

1949 IF AA(3)=7 THEN AA(1)=9:AA(2)=9:AA( 
3 ) =9 

1959 PLAY"t89v15o5g98a1698.f16e8.f16e8.d1 
6d8.e16e8.e8r8a8g916a8.e8c16c8.cC8r4d4C4" 
1969 FOR !=@ TO 2:LOCATE 8,11+I:PRINTSPC 
(12):NEXT:LOCATE8,12:PRINT" NEXT STAGE “" 
:FOR !I=9 TO 14999:NEXT 

1976 IF GE MOD 19=9 THEN LE=LE+1:IF LE>4 
THEN LE=4 

1989 IF RN=PEEK( &HE453 ) THEN RN=1 ELSE R 
N=RN+ 1 

1999 GE=GE+ 1 :GOSUB1119:GOTO 129 

1199 ′ ---- SCTeeI 1O. けっ て い ーー ニーー 

1119 AD=&HE418:FOR I=3 TO 1 STEP-2:POKE 
AD,VAL("&H"+MID$(HEX$ も ( &HE454+29X(RN- 1 ) ) , 
1 。2) ) : AD=AD+ 1 : NEXT I :RETURN 

1129 ' ---- GAME OVER ---- 

1139 PLAY"V15t22918o5reee-ddC+C+CCdC4o4b 
4o5e1":FOR J=9 TO 4999:NEXT:LE=LE-1:IF L 
E>9 THEN 129 

1149 FOR !I=@ TO 3:PUT SPRITE !,(9.299):N 
EXT:A=USR(9):FOR I=9 TO 2:FOR J=9 TO 12: 
LOCATE 8+J,11+I:PRINTCHR も (232 ) :NEXTJ。 1 し 
0OCATE9.12:PRINT" GAME OVER “" 

1159 IF SC>S1 THEN S1l=SC:LOCATE 3.22:PRI 
NT" You got high score ! " ELSE 1189 
1169 PLAY"t189@V1218o2aao3cefo2ao3cfo2ggb 
o3dccego4a1d4r",。"t189V1518oO4a9+a9+a9+a05 
co4b4g94o5e4r8e8f418eddcc416gddddde16d16c 
8c2" 

1176 IF PLAY(9) THEN FOR !I=&H21 TO &H81S 
TEP&H19:VPOKE&8H291E,I:FOR J= TO 5 :NEX 
TJ, 1 :GOTO 1179 

1189 IF INKEY$ く <>"" THEN 1189 ELSE LOCATE 
8.19:PRINT" HIT ANY KEY “":LOCATE 9,.0 
1199 IN$=INKEY$ も :IF IN$="" THEN 1199 

1299 '---- demWWO ---- 

1219 CLS:LOCATE 19.23:PRINT " まち 3 た ~“" 

1229 PRINT" みみ ぁみ みね か みみ かね 。 みみ みね 。 みね みね " 
1239 PRI】NT "" r み ね ー み ね ー み ね ー み ねー みね ーー みね ーー み ね ーー みね っ 『" 
1249 PRINT" | みね みね みみ みみ ね みみ みね みみ みね 1" 
1259 PRINT" | みね みね みね みね みね みね みね 。 1" 
1269 PRINT" 上 みみ みみ ね ーー み ねー みね ーー か みみ みね ーー みね ーー " 
1279 PRINTSPC( 96): "PUSH":SPC( 49 ) 1 "MAKE- - 
ニー-(1) "iiSPC(17) ij "GAME----(2) 75SPC(17) 1 "SA 
VE----(3)":SPC(69): "HIGH-SCORE "iRIGHT$( 
STR$( 19999999##4S1),7)jSPC(118)51" 

ーーーーー(C)S.A.S. 一 " 

1289 D=9:I=9:J=1:P=3:MC$ も = "21212428292124 
291919232624242831“" 

1299 IN$=INKEY$:IF IN$="1"0RIN$= "2"0RIN$ 
="3"THEN PLAY"V15132o5co4bo5cdcdedefefgf 
9a929 共 8" :FOR H=5 TO 6:PUT SPRITE H,(9,.29 
9) :NEXT:ON VAL(IN$) GOTO 1359 ,99,1499 
1399 IF PLAY(9)=g@ THEN D=D+2+(D=32 ) 32:P 
L=VAL(MID$(MC$,D- 1.2) ) :PLAY "S1 4M659t1991 

-8n=p15" 

1319 !=I+J:IF 1=299 THEN J=-1:P=2 

1329 PUT SPRITE 5,(I,158).19.P:IF J=-1 T 
HEN PUT SPRITE 6,(1+29.158).2.5:IF I=49 
THEN J=9:P=1 

1339 GOTO 129 

1349 '---- 四 AKEG SCTGGII ---- 

1359 CLS:LOCATE 5.19:INPUT "Teisei NO.": 
RN:A=USR(9):1F RN>9 THEN GOSUB1119:LOCAT 
E 9.3:A=USR1(@ ) 

1369 LOCATE9 ,9:STOP: LM=PEEK( &HE453) : LOCA 
TE 9.9:PRINT"1last screerr no="iLM:INPUT “" 
SCREEN NO.":LD:AD=&HE454+(LD- 1 ) x20 

1379 IF LD<1 THEN 1219 ELSE IF LD>LM THE 
N POKE&HE453,LD 

1389 K=&H1862:FOR J=9 TO 19:A$=" "IFOR != 
9 TO 6:A=VPEEK(K):K=K+2:IF A=249 THEN A$ 
=A$+" 1" ELSE A や =A$+"9" 


1399 NEXTI:A$ も =A$+"9":POKE AD+J。VAL("&b"+ 
A$):K=K-((J+3)MOD2=@ ) x36 : NEXTJ:GOTO 1219 
1499 CLS:LM=PEEK( &HE453):LOCATE 5,.8:INPU 
T "SAVE LAST NO."iLM:LOCATE2 19:PRINT "SA 
VE (SCREEN NO.1 -"iLMi")":BSAVE "CAS:DATA 
"。&HE453 ,&HE454+(LM- 1 ) x29+29:GOTO 1219 
1419 て いき て 
1429 RESTORE 1839:FOR !=9 TO 13:READ D:S 
OUND!』 ,D:NEXT 
1439 RESTORE1529:FOR J=1 TO 18:READG: FOR 
Il=9 TO 7:READP$:VPOKE Gw8+I,VAL("&h"+P$ 
) : NEXT Ii ,J 
1449 FOR !=1 TO 5:READ w1JW2、M3.W4:G1$(【 
) =CHR$(W1 )+CHR$( W2 ) :G2$( T エ ) =CHR$( W3 )+CHR$ 
( w4 ) :NEXT 
1459 VPOKE&H291C,&HF1:VPOKE&H291D,&H41:V 
POKE &H291E,&H81:VPOKE&H291F,&H71:VPOKE& 
H2096 , &H2 1 :VPOKE&H2007 , &H21 
1469 FOR !I=1 TO 5:FOR Jl TO 32:READD$ 
1479 B$=B$+CHR$ も (VAL("&h"+D$) ) : NEXTJ: SPRI 
TE も $( 1 )=B$:B$=" "NEXTI 
1489 "---- まい ん こ ~ よみ こみ ーー ニー ニー 
1499 AD=&HE499 
1599 READ A$:IF A$<>"※" THEN POKE AD,VAL 
("&H"+A$) :AD=AD+1:GOTO1599 ELSE RETURN 
151@ '---- DATA ---- 
1529 DATA 249.99.df,df,99.99.fd,fd,99 
1539 DATA 232.99.df,df,99.99.fd,fd,99 
1549 DATA 248.1F,69。4C,8C,8B,B3,B7,89 
1559 DATA 249.A9.86.96,81.98.5B,69,1F 
1569 DATA 259iF8,96.92.39.C9.C9,F1,91 
1579 DATA 251.95.61.69.81.19.DA,96,F8 
1589 DATA 241.99.99.96.97,7F,BF,5E, 2E 
1599 DATA 242、16.9A,.94.92.99.99.99.99 
1699 DATA 224.99.99.99.99.99,.49.69,.39 
1619 DATA 225,18、9C,9O, 93.91、99.99.99 
1629 DATA 226,.3E,41.81,83,.83,83.18,3F 
1639 DATA 228.3F.5F,5F,5F,2F,2F,1F,97 
1649 DATA 227.99.99.99.89,89.89,F9.88 
1659 DATA 229.C4 FE、E2.E2.E4 、C4 .D8.E9 
1669 DATA 233.99.98.22.9B,93,.93,18,.3F 
1679 DATA 235.3F、5F,5F,5F,2F。2F,1F,97 
1689 DATA 234.99.99.99.89.89.89.F9,.88 
1699 DATA 236.C4 FE,E2.E2.E4 、C4 .D8,E@ 
1799 DATA 248.259.249.251 ,241.224.242.22 
5 ,232.232。232.232.226、227.228.229.233。23 
4 .235,236 
1719 DATA 3C,23.27.2F,13.E5.13.4E.97 19, 
62.4B,68.97,.1A,.1E,3C,C4.E4.F4.C8.97.C8,7 
2.E9.98.46、D2.16.E9.58,78 
1729 DATA 1C,97.9F,1F、16,.44.16.49.97,.99。 
2A,6A.6A,97,1A,1E,.78.88.C8,F8,.78.B3,.78,F 
2.E9,19.EB,EB,1B,76,.B9,F8 
1739 DATA 9E,99.9B,9F,9E,1F、1E,9F,97,94。 
89.DF,DF,6F,1A,1F,E9.49.F9.F8,C8.94.CC,F 
8.F9.88.76.76.98.F9.68,.78 
1749 DATA 38,.3B,.3F,3F、1F,FF,1F,4F,97,1A, 
63,4B,6C。96,1A,1E,1C DC。FC,FC,F8,FF,F8, 正 
2.E9 ,5C,D9。E3,9F,FE,99.79 
1759 DATA 99.97,.1F,3F,3F,.77.77.41.77.77。 
3F,3F,1F,96.3E,99.99.E9.F8.FC,FC,EE,EE, 8 
2.EE,EE,FC,FC,F8,69,.7C,96 
1769 '---- まし ん こ ~ DATA ---- 
1779 DATA11,49,、18.21.16,e4.91.91.99,CD,5 
C。99.EB,A7,13,.7A 
1789 DATAC6,E5.D2.93.e4.C9.F9.21.54,e4,1 
6.9A,1E,92.CD,31 
1799 DATAe4.23.CD,31.e4.2B、1D,.C2.1E,e4,.2 
3.23.15.C2.1C,e4 
1899 DATAC9,4E,96.97,CB,91.D2,46,e4.3E,F 
9.CD,A2.99.3E,F9 
1819 DATACD,A2.99.C3.59,e4.3E,29.CD,A2。9 
9.3E,29 CD,A2.99.19.、E2.C9,※ 
1829 '---- SOUND DATA ---- 
1839 DATA 16.9.19.9.22.9.9.56.16,.16,16,1 
99.69.8 
1849 DATA 9.9.9.9.9.9.21.7.16.16.16,.99,2 
9 .9 


以下 この 繰り 返し で 画面 を 作 つ て 
いつ て ぐだ さい 。 作る だ びに 、 画 
面 の 番号 を 1 つ ず つ 大 きぐ し て い 
ぐ こ ご と を 泡 れ な いよ うに (LAST 
SCREEIN NO.=… が それ まで 
に 作 つ だ た 面 の 最後 を 表し て いる ふ 
オリ ジ ナ ル 面 を 作る と き は 、4 
つの 隅 を 尿 ず あけ 、10 個 以上 の 空 
白 を 作 つ て お ぐ こ と 。 
画面 を ひと と お り 作 つ だ ら 、 デ 
モ 画 面 で づ を 選択 。 カ セツ ト を 
AVE 状 態 に し て 作 つ だ 面 の 数 を 
入力 する と 自動 8 的 に ファ イル 宮 D 
ATA' で SAVE 上 し て ぐれ る 。 


一 画 面 の 作り 方 

デモ 画面 で 1 を 選ぶ と "TelS@l 
NO.@" と 聞い て こぐ る の で 0 を 入力 
する と 全部 壁 の 画面 が 由 て ぐる 。 
ぞ そ と で カー ン ツル ・ キ で と スペ ー ズ 
・ キ ー を 使 つて 写真 の よう つ な お 通路 
を 作る う 。 1 キヤ ラグ タ の 大 き さ 
は カー ソル 24 個 分 だ 。 削 りす ぎ だ 
と き は 、 ひ ら が な の ~ み "を 押せ ば 
壁 の キヤ ラフ クタ が ガ 出 て ぐる 。 1 面 
分 で き あ が つ だ ら 、 カ ー ソ ル を 画 
面 の 左上 まで 持つ て き て 、CON 
リタ ー ン と すれ ば 、SCREEN 
NO.P と 聞い て くる の で 、 ま すず 1 
を 入力 (これ が 画面 の 番号 に な る > 
Se ニッ ーー だ やど の 、 


マチ ル ダ BABY 画 面 例 
田 作 者 の 作っ て くれ た 1 面 か ら 
3 面 ま で の 画面 例 が これ だ 。 
*MAKE" の モー ド で と りあ え ず 
この 画面 を 作っ て 遊ん で みよ う 。 
あと は キミ の 知恵 を し ぼり だ し 
て 作る べし 。 


SO スコ ッ : X…… ミ ー ク ン の X 座 標 : AY( )…… モ ンス ター の Y 座標 
・ AA( )…… モ ンス ター の 種類 * Y…… ミ ー ク フン の Y 礎 標 : MUSB…… ミ ー ク ン 用 BGM 
・ 「… マ イム ・ AX( )…… モ ンス ター の XX 座 標 : MS お …… モ ンス ター 用 BGM 


7 ど 


FX …… ミー ク ン の 押し て いる : 田 プ ログ ラム の 説明 

キャ ラク フタ の X 座 標 10 一 30 初期 設定 
FY…… ミ ー ク ン の 押し て いる : 40~ 70 サブ ルー チン へ 

キャ ヤラ フタ の YY 座標 60-100 ゲー ム 初 期 設定 ] 
RX( )…… 爆 弾 の X 座 標 110-140 ゲー ム 初 期 設定 2 
RY( )…… 爆 弾 の Y 座 標 160 TIME 表 示 
PeeNP2A 170-310 ミー フン 移動 
TM( )…… 爆 弾 の 爆発 ツイ ム 320--580 モン スタ ー 移 動 
OO…: 出 口 の 番号 590-690 族 発 処理 
G( モラ スター の 自 ・ 700-850 ミー フン が 押し て い : 
TI( )…… モ ンス ター の 動き だ す : る キャ ラク の 処理 ・ 

時 間 ・ 860-880 ワー フ 処 理 


19 SCREEN 1.2.9:COLOR 15.1.1:CLS:KEY OFF 
:STOP ON 

29 PHC=9:DEFINT A-Z:VPOKE 8&H2999+15.2x16 
・VPOKE &H2099+12.9x16 

39 A$(9)="bcbcbcbcbcbcbcbcbcbcbcbcbcbcC" 
49 A$(1)="cbcbcbcbcbcbcbcbcbcbcbcbcbcb" 
59 ON STOP GOSUB 779 

69 FORL=1TO11:READW:W=Wx8:FORI=WTOW+7: RE 
ADD$:VPOKE I,VAL("&H"+D も ):NEXT 上 1,L 

79 DATA 97.54.25,.42.A8.31 .4A.94.22 

89 DATA 98.99.19.28、14.68.A5,4A,A5 

99 DATA 99,.99,.99,.99.90.31 .4A,94.22 

199 DATA 199,38.38.38.34.68,.A5,4A,A5 

119 DATA 194.99,99.99,19.99,99.99.09 

129 DATA 112.FF,.99.FF,FF,FF,C3,C3,.C3 

139 DATA 113,FF,FF,FF,FF,99.FF,AA,55 

149 DATA 114.98.18,18,FF,7E,3C, 66,C3 

159 DATA 115,.49.73,7F,7F,7F, 4C,49,40 

169 DATA 116,.4C,7F,7F,7F,73。49,49。49 

179 DATA 121.99.19.38.74.FA,F4.F5,74 

189 FORL=9TO11:A$=" "7":EORTI=1T032 : READB も $:A 
$=A$+CHR$S(VAL("&H"+TB$) ):SPRITE$(L)=A$:NE 
泊 ま Le 

199 DATA99,89.49.2C,1E,18,1E,CC,DB, DD , CB 
sD7.D1.5F,1A,1B,99.99.99.99.99.99,99,090, 
99,99.CF,F4.69.99.99,99 

299 DATA1D,.9B,96.9E,1C,.28.3E,99.99,99,90 
>99.99.99.99.99.89,C9.E9,79、28.38,.3E, 99, 
99.99.99.99,99.99.99,.09 

219 DATA99,.99,99.99.99.99.99.91.94.99,91 
>99.99.99,.99.99、1C,54.08.94.29.88.20,98。 
89,12.99,99.99.99,99,909 

229 DATA99,.99.99.99.99.09.93,.9F,F8,17,1B 
>91.99.99.99,99.99,99.1C,3C,、7C,FC,F9,E8 。 
28.E8.F9.F8.7C,1E,97,FF 

239 DATA99.99.99.99.99.99.97.78.78.97,99 
99,99.9 り 9.99,99,7F,97,97,9F,9F,FB,34,F5, 
F5.34.FB,9F,9F.97,97,.7F 

249 DATA99,3E,93.93.91.09,97,F8,F8,97,99 
>91 ,93,.93,3E,99.99、93.97,、8F,BF,DC,61 ,FD, 
FD,61,.DC,BF , 8F ,97 ,93,90 

259 DATA99,.99,.99.99.C9.E9.F9.F8,1F,D4 ,BF 
>48.28。FF,98,.FF,99.99.99.99.99,99.99,70。,。 
FC,17.F8,.99.99.F9,99,99 
269 DATAC9.69.39.1C,9F,97,18.17.17.18,97 
>9F,1C,39.69.C9.99.99、99.99、99.C9、38,C7 。 
C7,.38.C9,99,99,99,.99,99 

279 DATAC9,E9,F9,FF,91.99.99,15.15,.909,099 
>91,FF,F9.E9.C9.99,99.99,79.89,C9,E9, 9F , 
9F,E9.C9,89,79.99,99.,90 

289 DATA99,99,99,.99,.99,.99,.99,.A5,D9 ,9A,94 
>D9,99,99、99,99.99.99.99,99,99,99,89,090, 
A9.99.B9.A9,99.99,99,099 

299 DATA81.91.92.25.55.D5,。A9.35.A5,5B,6C 
>11.9A.95.81.92.C1.49.A4.74.A9.94.A5.75。 
22.54.92.A9.C8,.29,59,AD 

399 DATA99.99.99.99,99,.99,.99,FB,FB,99,009 
>99,99.99.99,99,99,99.99.99、99,99,99,EF , 
EF,99.909.99,99,99,99,090 


690 一 980 初期 画面 


圏 チ ェ ッ クボ ポイント 


319 CLS:LOCATE6,5:PRINT"[END LESS WAR]": 
LOCATE 3,22 

329 PRINT"(C) 1984 MASAKI SATOH" :LOCATE 
7,29:PRINT"HIT [SPC] KEY":NK=2 

339 SC=9:TP=9:TW=26:S=9:MS=9:PUTSPRITE9 , 
(119.55) ,15:PUTSPRITE1 (119.71),15 

349 PUTSPRITE3,(119,94) ,5:PUTSPRITE4,(15 
9,94).5:PUTSPRITE8,(75,139) ,14 

359 PUTSPRITE5,(75,.94),5:PUTSPRITE6.(119 
,>139) ,14:PUTSPRITE7 (159,139) ,14 

369 ST=STRIG(9)+STRIG(1):IF ST THEN CLS: 
GOTO 379 ELSE 369 

379 FORI=9@TO11:PUTSPRITEI,(9.9),9:NEXT:F 
ORI=9TO59 

389 R=RND(1)x27:R1=RND( 1)x29:LOCATE R,RI1 
:PRINT"h":NEXT 

399 LOCATE9.9:PRINT"LEFT : 
:PRINT"SCORE : 9" 

499 FORI=9TO027:FORL=21TO022:LOCATEI,LEPRI 
NT CHR も (97) :NEXTL , 

419 FORI=9TOSC+1:LOCATEI,1:PRINT" "ENEXT 
:SQ=9:FORI=9TOSC:LOCATE9+TS5Q,1:PRINTTT" 
429 PLAY"V1306A19":SQ=SQ+ 1 :FORL=9TO599:N 
EXT L,I:A=199:B=199:FORI=2TO11:PUTSPRITE 
1 (9.9) ,9:NEXT 

439 PLAY"T299L6905V13S9M60999B9R9A6G5B9A 
9B906C9" 

449 FORI=12TO8STEP-1:PLAY"V=IKD5":NEXT 
459 EX=9:EY=RND(-TIME)x149+19:EQ=RND( 1 )※ 
3+6 

469 X=249:Y=RND(-TIME)x149+19:PUTSPRITEQ 
・(9.9) ,9:Q=RND( 1 ) \3+3 

479 PUTSPRITE9 ,(A,B) ,15:PUTSPRITE1,(A,B+ 
16).15:PUTSPRITE2.(9,193),9 

489 ws=STICK(9)+STICK(1):C=(W=6)+(W=7)+(W 
=8)-(W=2)-(W=3)-(W=4) 

499 D=(W=8)+(W=1)+(W=2)-(W=4)-(W=5)-(W=6 
):C=CX19:D=Dx8 

599 IF B>133 AND A-8>15 THEN A=A-8 

519 IF A+C く <15 OR A+C>239 OR B+D<8 OR B+D 
>149 THEN C=9:D=9 

529 ST=STRIG(9)+STRIG(1):IF ST AND MS=9 
THENPLAY "03S6M599DDDDDD":MS=1:MX=A:MY=B 
539 PUTSPRITE19.(9.9),9:1F MS=1 THEN MX= 
MX+14 ELSE 629 

549 PUTSPRITE11,(MX,MY),13:IF MX>249 THE 
N PUTSPRITE 11,.(9.9),9:MS=@ 

559 IF X-29=<MX AND X+29>=MX AND Y-19= く M 
Y AND Y+19 り >=MY THEN 569 ELSE 580 

569 PUTSPRITE11.(9.9),.9:PUTSPRITE9,(9.0) 
・9:PUTSPRITEQ.(X。Y) 、4:PUTSPRITE19.(X,Y)。 
8 

579 FORI=9TO0299:NEXT:PUTSPRITEQ,(9.9) 9: 
MS=9:S=S+1099:X=249:Y=RND(])x149+19:Q=RND 
(1)x3+43:GOTO619 

589 IF EX-29= く MX _ AND EX+29>=MX AND EY-10 
=<MY_ AND_EY+10>=MY THEN 599 ELSE 629 


2":LOCATE15,9 


990 ご 1000 スコ ア 表 示 マシ ン 語 デー 確認 の た め 、 
1010 こ 1090 面 フ リア 処理 プロ グラ ム を 打ち お わ つ た ら 、 
11001110 画面 番号 決定 次 の プロ プラ ム を ダイ レク フト で 
1420 こ 1190 ゲー ム オ ー ル バー 実行 し て くださ い 。 

1200 ご 1330 デモ RESTORE 1 フフ 0: 
1340 一 1400 画面 作成 ・ = の : FOR 』=1TO8 
1410-1470 各 キ ャ ヤラ クタ 定 義 ・ 3:READ DS: フ = ニ フ +V 
1480-1500 マシ ン 語 読み こみ : ALC8H?+D$): NEX 征 
1510 ご 1750 キャ ラフ タマ デー マタ : 1 :PRINT HEXS(Z) 
1760 こ 1810 マシ ン 語 デー タ 2406 が 表示 され れ ば ひ OK で す 。 
1820 こ 1840 サウ ンド デー マ (エイ キキ ヂ ) 
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599 PUTSPRITE11.(9.9),.9:PUTSPRITEEQ, (EX 。 
EY) ,14:PUTSPRITE19.(EX,EY ) ,8 

699 FORI=9TO0299:NEXT:PUTSPRITEEQ、 (9.9),9 
・MS=9:S=S+59:EX=19:EY=RND( 1 )X149+19:EQ=R 
ND( 1 ) x3+6 

619 PLAY"O08V13S19M5999D64E64":LOCATE22.0 
・PRINT S:GOTO 479 

629 PUTSPRITE9。(X+13.Y),9:IF D く 9 THEN PU 
TSPRITE2.(A-12.B+14),.8 

639 IF B+5>149 THEN 649 ELSE B=B+4 

649 LOCATE9,29:PRINT A$ も (PCH) : PCH=PCH+ 1 : 
F PCH=2 THEN PCH=9 

659 LOCATETW,19:PRINT CHR も (121)9+ す "7" "ELOCA 
TETW,29:PRINT CHR$(199)+CHR$( 98 ) 

669 TW=TW-1:IF TW=9 THEN LOCATE1.19:PRIN 
T " "iTW=26 

679 X=X-7:PUTSPRITEQ, (XY) . 5:PUTSPRITE9。, 
(X+13.Y) ,。8:IF X< く 9 THEN GOTO 460 

689 IF X-15= く <A _ AND X+15>=A_ AND Y-15= く <B A 
ND Y+15>=B THEN Y=RND( -TIME)x149+109:X=25 
9:Q=RND( 1 )x3+3:GOTO 789 

699 Y=Y+Z:IF B-19>Y THEN Z=19 ELSE IF B+ 
29 く <Y THEN /Z=-19 , 

799 IF Y+Z>148 THEN Z=-8 

719 EX=EX+8:PUTSPRITEEQ, (EX,EY) 14:TF EX 
>245 THEN EX=9:EY=RND( -TIME)x149+19:PUTS 
PRITEEQ,(9.9) ,9:EQ=RND( 1 )x3+6 

729 IF EX-15= く <A _ AND EX+15>=A _ AND EY-15= く 
B AND EY+15>=B THEN EY=RND( -TIME)x149+19 
・EX=9:EQ=RND( 1)x3+6:GOTO 789 

739 EY=EY+TEZ:IF B+16 く <EYTHEN EZ=-6 ELSE E 
/=6 

749 TP=TP+1:IF TP>199 THEN TP=9:GOTO880 
759 IF EY+rEZ>148 THEN EZ=-5 

769 SR=RND( -TIME )x13+2:VPOKE &H2999+13,5S 
Rx16:A=A+TC:B=B+D:GOTO 479 

779 COLOR 15:CLS:SCREEN 9:WIDTH 49:PRINT 
"GOOD-LUCK ! GOOD-BYE ! "IPLAY"V1306B25D1 
9B25D19" :END 

789 NK=NK-1:IF NK=-1 THEN 819 ELSE LOCAT 
E6.9:PRINT NK:MS=9:PUTSPRITE2 (9.9),09 
799 FORI=BTO145:PUTSPRITE9.(A,I),15:PUTS 
PRITE19,(A.I+4) 8:PUTSPRITE1.(A,T+16),.15 


899 NEXT:PUTSPRITE11.(9,9),9:A=199:B=109 
:FORI=9TO03999 : NEXT :PUTSPRITE6 ,(9,9 ) ,9:GO 
TO 419@ 

819 FORI=9TO11:PUTSPRITEI,(9、9) ,9:NEXT:F 
ORI=9T027:LOCATEI,9:PRINT" ":NEXT 

829 PLAY"V1403F19R29F19E5G5R19F19R29F19E 
5G5R29G19R29G19F5B5A19G19F19E19C5" 

839 VPOKE 8223.&H99:LOCATE9 , 7 :PRINT "GAME 
OVER":LOCATE7,19:PRINT "YOUR SCORE" :S 
849 IFS>HSTHEN HS=S:LOCATE4 , 19:PRINT "YOU 
MADE HIGHT SCORE" 

859 LOCATE6 , 13:PRINT "HIGHT SCORE":HS:LOC 
ATE7,16:PRINT "PUSH [SPC] KEY" 

869 ST=STRIG(9)+STRIG( 1 ) :SR=RND( 1 )x13+2: 
VPOKE &H2999+13,SRx16 

879 IF ST THEN FORI=9TO2999:NEXT:GOTO 31 
9 ELSE 8660 

889 LOCATE9, 29:PRINTA$ も (PHC ) :LOCATETW+1 . 1 
9:PRINT" ":FORI=2TO11:PUTSPRITE1I ,(9,.9),9 
899 NEXT:FORI=ATO15STEP- 1 : PUTSPRITE9 , ( 【 , 

B)。15:PUTSPRITE1 、(1.B+16) 15 

999 NEXT:A=15:FOR I=B TO 149:PUTSPRITE9 , 
(A,I),15:PUTSPRITE1,(A,I+16) ,15:NEXT 

919 FORI=21TO13STEP- 1 :LOCATE9,29:PRINT A 

$(PHC ) : PHC=PHC+ 1:IF PHC=2 THEN PHC=9 

929 LOCATEI ,29:PRINT "qqqqdcdc":LOCATETI , 1 

9:PRINT "pppp y " 

939 LOCATEI,18:PRINT"S ":FORL=9TO159:NEX 

0 挟 

949 FOR I=A TO 199:PUTSPRITE9, (TI,149),15 
:PUTSPRITE1.(I,156),15:NEXT :MS= の 9 

959 PLAY"L19V1304S9M69999AGFGABABO5C1" 

969 FORI=9TO15:LOCATE13.18:PRINT "Ss":FORL 

=9TO399:NEXT L:LOCATE13,18 

979 PRINT"t":FORL=9TO299:NEXT し :SR=RND( - 

TIME)x13+2:VPOKE &H2999+13.SRx16:NEXT I 

989 A=199:B=199:LOCATE13,18:PRINT" ":SC= 

SC+ 1 

999 LOCATE13.19:PRINT" ":LOCATE9 , 29 
:PRINTA$(PHC) :FORI=149TO199STEP- 1 

1999 PUTSPRITE9,(A,T),15:PUTSPRITE1 ,(A,1 

+16),15:NEXT:GOTO 419 


較 変 数 リ スト 


TP…… 基 地 まで の 距離 


MS…… ニ サイ ル が 出 て いる か 


… ミ サイ ル の X 座 標 


MY…… ミ サイ ル の Y 座標 


TW 1 木 の 座 標 NK does 自 機 の 数 

Ge 2 X,Y…… 英 の 座標 

HS…… ハ イス コア EX.EY…… 敵 の 座標 
ST……STRIG 入 力 判定 用 Z.EZ…… 敵 の 移動 用 
W……STICK 入 力 判 定 用 AS( )…… 地 面 の キヤ ラフ タ 
AG 自 機 の X 座 標 較 プ ログ ラム の 説明 

選 …… 自 機 の Y 座 標 10~ 50 初期 設定 


00<170. ギヤ ラフ タデ ー タ 


180300 スプ ライ ト デ ー タ 田 チ ェ ッ クボ ポイ ント 
310360 マイ トル 画面 ・。 キャ ラフ クマ が と て も いい で す 
370 一 460 画面 設定 : ね 。 距離 TP が 200 に な る と ステ 
470-510 自 機 移動 ・ 一 ジフ リア に な り ま す が 、 画面 
520-550 ミサ イル 発射 ・ の 表示 が な こく 、 ち よ ょ つと ま の び 
560-610 敵 の 爆発 ・ する 感じ で す 。 
620-770 敵 の 移動 ・。 フ 40 征 P=TP+1 : の 
780 一 800 自 機 の 旭 発 次 に LOCATE9., O : PR 
810870 ゲー ム オ ー バ ー ・ INTUS INGY\### せ : 
880 ご 1000 ステ ー ジ クリ ア 処 理 ・ TP を 付け た し て みて ぐだ さい 。 
(エイ キチ ) 


ざ の 


19 CLEAR 399.&HEBFF : SCREEN 1.2.9:COLOR 15,12.1:WIDTH 32:KEY OFF 

29 DEFINT A-Y:DEFSNG Z:DEFSTR D:DEFUSR=&HEC99:DIM X(18),Y(18):Z=RND(-TIME/2):H=9 
39 DEFFNM( 1 )=VAL("&H"+MID$(D,IxJ+1 1 ) ) :DEFFNR( 1 )=INT(RND(1)*I):DEFFNL(X,Y)=ーX%(Y 
>(X-1 ) ) -Yx(Y く <X) :DEFFNS( 1 、J) =VPEEK( &H1B99+J+T%4) 

49 RESTORE 629:FOR Il=9TO32:READ D:S=9:FOR J=9TO16:S=S XOR FNM(4):NEXT:PRINT 
"[":PEEK(&HF6A3)+PEEK(&HF6A4 )x256:"] --- "iMID も ("OKNG" 。(S=9 )x2+3.2):NEXT・END 

59 RESTORE 619:FOR !I=9TO18:READ X(I),Y(I):NEXT:LOCATE12.22:PRINT"HOP JOKRER" 

69 FOR !I=9TO 3:READ D:FOR J=9TO31:VPOKE &H399 +Ix32+J。FNM(2):NEXT:NEXT 

79 FOR 1I=9TO 3:READ D:FOR J=9TO31:VPOKE &H3899+Tx32+J,FNM(2):NEXT:NEXT 

89 FOR 1!=9TO23:READ D:FOR J=9TO31: POKE &HEC99+Ix32+J,FNM(2):NEXT:NEXT 


39 READ D:FOR J=9TO31:VPOKE &H2999 


+J,FNM( 2) :NEXT 


199 FOR I=9TO7:VPOKE &H159+1,VPEEK(&H378+1 ) :NEXT : AB=&HEEFD: AR=&HEEDS 


119 DB= "xx"+STRING$(2.29)+CHR$ も (31)+ リ ※※「 


126 B=9:GOSUB 489:S=9:L=1 


139 E=19:M=9:N=FNL(8,L\3+1):B=FNL(25 、L\2):P=FNL(159,」Lx9):W=3999-LX159:W=-WX(W>9 ) 
149 GOSUB 599:GOSUB 559:GOSUB 596 


159 


PLAY 


"T154S9M899905L16CD8 .EFGABA8.GF8.GA8.GFEDCD8 . ED8 .T159CDEFDEFGEFGAFGAT15 
1BDEFGEFT159GAFGABO6C4" ,"T169V1202L4CECEDCECDEFGABO3C4 ." 、"T169V1106L8CEG4CEG4CEG 


4CEG4CEG4CEG4CEG407C2" 
IF PLAY(9)<9 THEN 166 


169 


239 


LOCAT 


Z=USR(W):Z1=Z\256:Z2=ZMOD8 :Z1=Z1-255x(Z1 く =9 ) :Z2=8-(Z2-8x(Z2 く = ) ) :C=FNS(Z2, 3 ) 


YYPRTNI で MES SL 


IF Z1< 49 THEN IF C= 9 THEN 379 ELSE EsE-1:GOTO 176 


ま F る 1 


く 89 THEN IF C=19 THEN 379 ELSE EsE-1:GOTO 179 


IF Z1 く 120 THEN IF C=15 THEN 379 ELSE EE-1:GOTO 179 


ER 3 
PLAY 


く 169 THEN IF C= 5 THEN 379 ELSE EsE-1:GOTO 179 


"T209S9M6999L1604B6A#7A8G#9G109M3999F#FM2099ED#M1399DC#M8999C2" ,"T209V15 


L160S5CEV1 4CEV13CEV1 2CEV1 1CEV19CEV9CEV8CECE" ,"T299L16V1302CDECDECDECDECDEC" 
249 J=9:FOR 1=9TO8:J=J+PEEK(AR+Ix4+3):NEXT:IF J=9 THEN 276 

259 IF PLAY(9)<⑳ THEN 259 

269 M=M+1:LOCATE 19.19:PRINTM: IF M<3 THEN 189 


279 


PLAY 


"T299S9M7999L804CEDC.EG.05C04AGE.CD.EEEG.FD.C2.."。"T299 V11L803CCEDEEEC 


EDEDDDCDEFEEDDCC" ,"T29907V19L8CEDC. DD . EEEC . DD . CCCEEDDCCC" 


280 


FOR 【I 
NEXT・ 
FOR I! 
LOCAT 
IF H< 
TS=20 
FOR I 
LOCAT 
IF IN 
PLAY 


=9TO7:IF FNS(T,9) く 299 THEN J=I:C=FNS(T,3):X=FNS( T。1):Y=FNS(T,9) 
TS=39:TN=J:TX=X:TY=Y:TA=76:TB=124:TC=C:GOSUB 699 

= 人 090STEP22PUT SPRITEB J。 (76f ほ 。124). 6、1 

E 19+INT(I/8).16:PRINT MID$S( "| GAME OVER "。1+INT(I/8) ,1) :NEXT 

S THEN H=S ELSE 369 

・TN=J:TX=166:TY=124:TA=194:TB=98:TC=C:GOSUB 609 

LUSUD つら LBP 22PUI SPRKTE J、(T09*【T 98) で 、! 

E 14+INT(I/8),13:PRINT MID も (STR$(H) ,1+INT(I/8 ) 、1 ) : NEXT 
KEY$=CHR$(13) THEN S=9:L=1:GOTO 139 ELSE 369 


"T299S9MI1M9999L1604GO5CEGCEGO6C1" 、"T299S9L1604EGO5CEO04GO5CEG1" 、"T299S9L 


1604CEGOSCO04EGO5CE1" 


389 


F=9:F 
S=S+F 
IF N> 
IP PL 
PLAY 


OR 1=9T08:F=F+PEEK(AR+3+IX4):NEXT 
%E/59:LOCATE 9.6:PRINT SEPOKE AB+Z2X8.9:N=N- 1 
9 THEN 189 ELSE IF E く <19 THEN 4709 

AY(9) く 9 THEN 419 


"T169S8M2999L405ABAEDEFDECDO4BO5C04BS9M5999A1", "T16903V11L4CDFADEFAFEDA 


CEV9A4" 。"T16907V8L4ABAEDEFDECDO6BO07CO06BA4" 


439 
449 
459 


619 


TS=60 
FOR 1 
LOCAT 
S=S+F 
IF PL 
PRINT 
FOR 【 
RESTO 
READ 

FOR I 
IF B> 
LOCAT 
FOR 【I 
POKE 

POKE 

NEXT : 
FOR I 


FOR !=9TOTS:PUT_SPRITE TN,(TX+Ix(TA-TX)/TS,TY+Ix(TB-TY )/TS) ,TC,9:NEXT : RETURN 
DATA 1.4.1.18.3.8.3.14.5。1.8,11.8.16.9.4.14.8.16.8、16.16.16.18,.18.8.29.8,21 。 


・TN=Z2:TX=FENS(Z2。1):TY=FNS(Z2.9):TA=28:TB=42:TC=FNS(Z2.3) :GOSUB 699 
=9T099 STEP 2:PUT SPRITE Z2。(28+1,.42) 。TC,9 
E 4+INT(I/8).6:PRINT MID$( "BONUS"+STR$S(F)+" "。INT(I/8)+1 ,1 ) :NEXT 


AY(9) く 9THEN 479 ELSE L=L+1:GOTO 139 


"※※" SSTRING$ も (255.42)jSTRING$ も (255,42) 1STRING$(255.42)::VPOKE &H1AFF,42 


=1TO22:LOCATE 1,I:PRINT MID$ も (SPACE も (39 ) ,1.27-(I MOD 5> く < )x3) 1 :NEXT 
RB、98 人 9 

1。J:IF 1I>9 THEN LOCATE I,J:READ D:PRINT D:GOTO 519 
=9TO18:LOCATE X(I),Y(I):PRINT "  "+STRING も (2 .29)+CHR$(31):" 
9 THEN FOR 1I=1TOB:J=FNR(19):LOCATE X(J) ,Y(GJ) :PRINT DB:NEXT 
E 9.6:PRINT 5:7 "ELOCATE 19.8:PRINT LELOCATE 19,19:PRINT M:RETURN 
=9TO7:D="59AF":J=FNR( 4 ) 

AB  +Ix8。-FNM(1)x(I く <N) :POKE AB+1+IxX8,。INT(RND( 1 ) x299)+20 
AB+3+IX8.19:POKE AB+4+Ix8.255:POKE AB+6+IX8.9:POKE AB+7+Ix8.9 
RETURN 

=9TO8:POKE AR+2+Ix4.9:POKE AR+3+Ix4.P:NEXT:RETURN 


":NEXT 


OO フク 2 22 4 392319. 26.9 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 


JF7F7F7F3F999999FFFFFFFFFF999999FCFEFEFEFC9999993C7F7F7F3F9F9999920F 
り 9FFFFFFFFFF99993CFEFEFEFCF09999387F7F7F3F9F99999981FFFFFFFFFF99B981 
1CFEFEFEFCF9999999387F7F7F3F9F99999981FFFFFFFFFF991CFEFEFEFCF9996969 
99993C7F7F7F3F97099999FFFFFFFFFF99993CFEFEFEFCE9B574669ACBBD5A8F99C4 
949A241BAF3FSFAF1F6F174F151D929169A958D9FDFEFDFEFCFBF4F8DA4428499DCA 
919592352B3F4F3F1FBF4F1F5B2512919949B46CFAF5FAF8FAFDF3FCF4F9A9599734 
91949D2F3F4F175F9BSF279D169599999948A45AF8E2FCD9E8F2F854A849499946AA 
り A959F2F3FCFBF5F1FS5FAF5F362D92994948A4DAF8F2FDF8FCF2FCD4AC4959891CE9 
23235E235613EDS3FBEEE5215DEF115EEF91FF923629EDB9CD4EECAF32F9EECDA278 
SBECCD42ECCD5BECCD42ECCD5BECCD42ECCDD7ED3AF9EEA728E1E1772B3AFAEE6192 
77C92AFBEE119199A7ED5229FCC9219918115DEF919993CD5999C9DD21FDEE968232 
98CDA1EC119899DD1919F6DD21FDEE213DEF9698DD7E93D6967723DD7E91D694F995 
7723EDSFE69C7723DD7E997723119899DD1919E9213DEF11991B912999CD5C99A368 
C9DD7E09A72995DD3693D7C9CDB7EDE5FDE13E2AFDBE99299EFDBE292999DD36A79F 
9491CD4BEE1811FDBE91299CFDBE212997CD4BEEDD3694FFDDCB967E2829FDBEEFFD 
り 9207DFDBE912978DD7E952F6FDD7E962F6723DD7595DD7496CD4BEE1862FDBE261A 
292997FDBE21299218DEFD7E20FE69384F6FFD7E21FE69384767FE6339177DFE1BA2 
633912DD7E97A728943DCD51EEDD7797CDA3ED182B7CFE6338297DFE633815DD3EEB 
7E973CFE9A38923E9ADD7797CDA3EDCD57EE189CDD3694FF18E5DD36949118DF586D 
DD7E94DD8691DD7791DD6E92DD6693DD5E95DD569619DD7592DD7493DD7E97A7C789 
2819DD6E95DD669611289919DD7595DD7496DD7E91FEF9C9DD6E9378E69767225849 
F9EEC9DD6E9711BFEE269929197EDD7795237EDD7796C9D5F51 15DEFDD7E93E6D6C6 
F86F26092929191699DD7E91CB3FCB3FCB3F5F19F1D1C9FD21DEF1DD21D5EE962356 
99CSCDFDEDC1119499DD191BFD1919F121DEF111811A915B99CD5C99C9DD7E92774F 
A72019DDBE932817DD7E99CD4191DDA691299CDD3593DD3692941893DD3592DD49DA 
4692943E5D3C3C3C19FBFD77493CFD77413CFD7742DD7E93A729943E1C1898E6448E 
F907070797C639FD7791C9E52174EE189AE5218DEE1894E521A6EED5F556237E697D 
23FEFF2992ED5F5F7ACD93997EA729EDF1D1E1C999FF919992FF939194FF9592279F 
97F8981999199A199C939D9999999991949299939494FF959497F8981999199A9EE6 
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画 交 数 リス ト : Z1…… 右端 に 行 つっ た ボー ル の 
際 AB…… ポー ル の ワー クエ リア : 高 さ 
ッ 続 の アド レス ・ Z の …… 右端 に 行っ を ボー ル の 
0 AR…… フ リッ パー の ワー クエ : ナン バー 
ボボ こ リア の アド レス ・ 圏 プロ グラ ム の 説明 
B…… 障 害 物 の 数 ・ 10 一 30 スク リー ン 机 定 、 変 
ロ 決 E…… 得 点 の 倍率 数 定義 、 関 数 定義 
グ ま F…… フ リッ パー の 残り 打数 : 40 チエ ッ ク フサ ム 
H…… ハ イス コア : 50-110 キャ ラク タ 、 機 概 語 
の 。 En レ ペ ル ・ の 書き こみ 
2 M…… ミ ス の 数 : 120-160 ゲー ム の 初期 化 
取 プ N…… ボ ー ル の 数 ・ 170-220 メイ ン ル ー チ ン - 
内 P…… フ リッ パー の 初期 の 打数 : 230-260 ミス の 処理 
ん 東 S…… ス コア ・. 270-360 ゲー ム オ ー バ ー 
だ 泉 TATB.TC.TN.TS.TX,TY : 370-410 ボー ル の 入 つ だ と き 
て 風 。。 “…… スプ ライ ト 物 動 用 : の 処 理 
、 間 W…… ウ ェ エイ トマ タイ ム : 420-470 ボー ナス 
6 Z…… 機 械 請 ル ー チ ン か ら の /\ : 480-540 画面 作成 
際 ラメ ー タ ・ 550580 ボー ル の 初期 化 


1OO REN 素 素 玉 束 東 涼 束 涼 率 束 京 束 束 涼 束 東京 束 京 氷 
110 REM * し 1 
12O REM * RUOPE R DPE* 
1 る O REM # 1 
14O REM  #* DrOqram siNQGA し 1 
150_ REM .*# day :9/29 束 
16O REMN * for sJR-200 し 1 
17O REM * 1 
1BO_ RENM 姜 率 京 東京 束 京 束 京 束 束 率 宮 涼 束 束 束 京 京 京 
19O _ TEMPO 109: BUSUB 151OiCLS: GODSUB 13 さ 3O 
2OO_ REM 』:s ショ キ ss 

210 5 ら =Os MnQ= く 』 人 QD=* じ 100 


220 POKE O。Os RQANDONMI ZE 』T=600 

2 さ O_ BOSUB B70』 じ 人 

24O TX=INT(RND( 1 ) * つ 9+1)gTY=INT(RND( 1 ) * つ O+ る) 

25O X=1 gs Y= フ フ s じ =Os GUUND 15OO。 20 

26O0 REM gs ケー ム gs 

270 COLUR 5。。1:LOUCATE X。YsPRINT じゃ を 

28O IF PEEK( 多 さ う 5) =O THEN TEMPOU 4OsPLAY "B" 。。7F う 8 。 も 7FOO 
290 COLDR 6。。DsiLODCATE TX。TYsPRINT G*:GOTOU 78O 

さ OO IF C>28 AND X=1 AND Y= さ THEN 1060 

る 1O COLOR 7。,OgLDCATE 7。OgPKINT 8 

さ 20 IF TX=X AND TY=Y THEN 1210 

ささ O = イー-1 sg IF 本 <O THEN 1210 

さ 4O0 LOCATE 16。2 つ 3sPRINT Ts 

さ 5O PICK K 

さ 6O IF K= あ 6B QND PEEK(AD+(X+1 ) + さ つ *Y)= テ 4 THEN X=X+1s じ = リ 多 げ 


さり 9O IF に K= 多 6D QND PEEK(QD+X+ さ 2 まま (Y+1) )=5 THEN Y=Y+ii じ ま = リ ん" 
40O COLOR 7。。1』LUCATE X。YsPRINT の 
41O COLOR 。。OPICK に 

420 ITF Km も 49 THEN 48O 

4 さく O IF K= も 4D THEN 540 

44O IF Ke を 4 人 Q THEN 60O 

45O IF \K=$4B THEN 66O 

46O、IF に K=6D AND Y<22 THEN 730 

47O_ GOTO 270 

4BO X1mXsY1=Y-1 

49O 1F PEEK(AD+X1+Y1* く 2)=O THEN 270 


SOO IF PEEK(AD+X 1+Y1% さ つ ) = さく THEN SUUND 1000。6: 5=5+10』 じ = ピ + 1 


51O IF Y1=2 THEN 27O 

520 COLOR 5,。1:LUCATE X1。Y1sPRINT "ん "gY1=Y1-1 
5 さ SO BOTD 49O 

540 X1=XiY1=Y+1 

55O IF PEEK(AD+X1+Y1*32) =O THEN 27O0 


S6O IF PEEK(AD+X1+Y1*% る うつ)= さ THEN BODUND 1O000。6』3 = ら +10』 じじ = じ + 1 


ら 70 IF Yi1=22 THEN 270 

SBO COLOR 5。,。1:LUCATE X1。Y1iPRINT "ん" sgY1=Y1+1 
SO GOTOU SS5O 

6OO X1=Xー1gY1=Y 

610 IF X1=O THEN 27O 

62O IF PEEK(AD+X1+Y1* る 2 つ )=O THEN 270 


ら 6 さ O IF PEEK(QD+X1+Y 1 # さ 2) = テ さ THEN SUUND 1000。6』 = ロコ +10』 ビニ ピ + 1 


64O COLOR 5。,1:LDCATE X1。Y1:PRINT "も "=X1=X1 一 1 
65O GOTO 61O 

660 X1=X+1sY1=Y 

67O IF PEEK(AD+X1+Y1*32)=O THEN 27O 


@2 


s BOT0 40O 
さ 7O0 』F に K= あ 6 AND PEEK(AD+(Xー1 ) + る 2*Y)=4 THEN X=Xー1: じ =" あ "= GUTOU 400 
さ BO IF K=$69 AND PEEK(AD+X+ さ 2 ま (Yー1 ) ) =5 THEN Y=Yー1:C も ="Z"sBDTD 40O 


D LUCATE コ 。12sPRINT 


199C969D9999999A9192929B9392949C959297F8981999199A199C969D9999901AEO9 
9949FE89FDC9FC99FC89FB99FB89FA99FA89F999F99589999F9529999F939199A283 
9F9598999F9289999F9498999F9494999F9294999F9208999F5D92D1979F9D991F84 
111111FC1CBC9C9CFCFCFCFC7C9C111111111111111111111111111111111111ED40 
3③.3,LL[ HOP JOKER ]]].4.13。HIGH SCORE,2.21."Z2 X C V B N M 
4.6.SCORE,5.8.LEVEL.6.19、MISS.8.16,“ 和 
24.2.RED=>,23.17。BLUE=>,22.12.WHITE=>,21 7,YELLOW= >。9 9 


く 


590 フリ ッ パ ー の 初期 化 : TAP-TAP / と 同様 に 内 蔵 チ 
600 スプ ライ ト の 物 動 エッ クサ ム が あり ます 。 

610 障害 物 の 位置 デー タ リス ト の 40 行 が デー 部 分 の 
620-650 キャ ヤラ フタ デー タイ チエ ッ ク フサ ム に な つて いま す 。 
660-690 スプ ライ ト デ ー タ すべ て 打ち こみ RUN さ せる と 
700-930 機械 語 デ ー タ 行 番号 を 表示 し な が ら OK / 

940 カラ ーー データ と 表示 し て いき ます 。 も し 、N 
950-970 画面 デー タ G が 出 だ ら その 行 が 間 違 つ て い 
還 マ シン 話 の 説明 る の で LIST に も ど し て 修正 し 


ECU0 で EC メイ シル ー チ ン 
EC42ーEC4D ウエ イト 


EC5B<EDDO ボー ル を 動 ・ に し て (リス ト の 空白 部 分 に R 
ガ す MG 打ち こん で りり ターン 9 る 

EDD ノ て EE4A フリ ツ ッ パ ー : だ け で す )、 RUN さ せ て こ だ さ 
を 動か す い 。 (エイ キチ ) 

EE4BーEEBE 音 を 出す 

避 違 選民 ウー の 


田内 蔵 チ ェ ッ クサ ム の 使い 方 
この プロ グラ ム に は 、 前 号 の 


w @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @e @e @e @ @ @ @e @ @ @ の @ ら @ @ @ 
6 @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ ② @ @ @ @9 @ @ @ @ @ @ @ @ @ @ @ @ @ @ 


IF PEEK (AD+X1+Y1* さ くつ )= ス THEN SUUND 1000。6: 5=5+10: じ = ニ ビ + 1 
IF X1= さ 1 THEN 270 


D CDLDR 5。。1:LUCATE X1。Y1:PRINT "まり 3X1= ニ X1+1 
D BOTO 67O 
D BOTH 270 


COLOR 7。。OsLUCATE X。YiPRINT "9 "sgSOUND YK100。 2 
IF PEE ド EK (AD+X+ そ 2*(Y+1 ) ) = さ THEN _ SOUND 2OOO。 うさ: =5+50 5 ビ = ビ + 1 
IF PEEK (QAD+X+ ス フ %(Y+1 ) ) =O THEN 270 
IF Y=22 THEN 270 
Y=Y+1s CULUR ツウ 。。1:LOCATE X。YsiPRINT "7"gBODTO 730 
R=INT (RND (1 ) ※* さ +1) siOUN R GOUTOU 790。BOO。B10。B20 
IF TX< さ QO THEN TX=TX+SBN(X-TX) 』 GUTO 3O 
IF TX>1 THEN TX=TX+SGN(X-TX) : GUTU B30 
IF TY く 22 THEN TY=TY+1 s: GUTD 3O 
IF TY>4 THEN・TY=TY-1:GUDTOU B さ O 
COLOR 5。。1:LUCATE TX。TYsPRINT "の! 
IF RMND(1)<。2 THEN は 生 =" 幕 "sD=1 
IF RND(1)>.2 THEN は = リ " "gsD=O 
GOT0U さ OO 
REM sgs カビ メン ss 
FUR Ii=O TO 76BsPRINT " "jsgNEXTsCHLUR 4。O。1gLOCATE O。 さ 
FDR 1】=1 TOD 1Q0+INT(RND ( 1 ) * 日 + 1 ) 
N=INT (RND ( 1 ) まつ 5 ら + 1 ) 
M=INT (RND( 1 ) *19+ さ ) 
LUCATE N。MsiPRINT " 上 
NEXT 
FOR 【=O TO 22sLOCATE O。IgPREINT "の "sgLDCATE う 1。IsPRINT “" 
NEXT 
FOR I=O TO さ 1sLOCATE I。23gPRINT "asNEXT 
COLOR 7。。OsLOCATE 2。40 
PRINT "SCORE "'』 
LUCATE 16。OsPRINT 
FOUR 1I=1 TO 31 
N=INT (RND ( 1 ) *% つ 9 ウィ +2) 
M=INT (RND ( 1 ) *19+4) 
COLOR 6。。1:LOCATE N。MsPRINT " 利 " 
_NEXTsCULOR 7。。O 
RETURN 
TEMFU 109gFUR !=1 TO 4:FUR J ゴ =1 TOD 7:COLOR J。。O 
! 戸 RTTERN CLEAR!" 
SUUND 】%J%1O0O。 さ sgNEXTINEXT 
FUR != ま まじ C1OO TO まじ さ FF : P=PEEKE ( I ) 
IF P= ェ 5 THEN =Q+1 


"MAN" sa 


D NEXT: BD=INT((1000-Q) /10)%10 
D LOCATE 8B。15sPRINT 


"BONUS"』B0Oi "PTS!" 

=S+BUs LUCATE 7。OsFRINT SiSOUND さ QOO。 さ si =O 

FUR 【=1 TO 4000』 NEXT』 T= ら OO-LE: LE ビュ LE+50+INT (RND( 1 ) まき + す 1) %1O 
IF T>15O _ THEN 230 

TEMPU 109sFUR !=1 TO 4:FUR J=1 TO 7sCOLOR J。。O 

LODCATE 6。12:sPRINT "YUU ARE MONDERFULL! 

SUUND I*JW100。 う 3: NEXTINEXT 


D LUCATE 日 。15:PRINT "BONUS 11000 _ PTS! 
D =5S+1000s LUCATE 7。OsPRINT SiSOUND 5000。5: GOTD 230 
D_ TEMPO 109:sFUR 1!=1 TO 4sFUR J=1 TO 7gCOLODR J。』0 


LODCATE 12。12sPRINT "MISS MIS5" 
SOUND T*J*100。 さ sgNEXTINEXT 
MQ=MQA-1 : IF Mn=O THEN 1260 


D T=SOOs GOTO 230 


で 大 ざい 。 すべ て OK / 
な つ だ ら 、40 行 を 一 記 REM 文 


1260 FOR !=1 TO 6:FOR J=1 TO 7sCOLOR J。。O 
1270 LUCATE 9。12kPRINT "GAME 15S OVER!" RETURN 

128O SOUND 1*J*100。 さる: NEXTsNEXT REM ss DATA si 

129O COLDR 5:LOCATE B。17:PRINT "PUSH Y DR N KEY" DATA FF。FF。FF 。OO。 DB, DB。 DB。 DB 

13OO PICK KiIF K=ASC("y") THEN RUN 21O DaTA 5A。5A。 さ じ 。 1 ヨ 。 1。24。 24。24 

1 ス 1O 1F K=ASC("n") THEN CLS:END DATA 1 ロ 。 1 日 。 さじ 。 5 。 99。 24。 24。24 

1 さ 2O GOTOD 1290 DATA 3C,。 7E。 日 1 。FF 。 1 。FF 。 7E。 さじ 

13 く O LDCATE O。 さ CDOLOR フ DATQ FF。OO。OO。 OO。 OO0。 00。 00。 OO 

1 さ 4O PRINT " DATA 10。10。10。10。 10。10。 10。10 

135O PRINT " FUR !=$COOO TO ま $CO2F 

136O0 PRINT " READ を:sPUKE 1 エ 。 ツ AL ("りす 人 急 ) 

1 さ 7O PRINT " 訓 了 NEXT Ii 

1 さ BO PRINT " 了 DATA と C。27。C。25。C 。 つ アフ 。C。 25。 と 。 つ 7。C。 つ 5。 て 。 フ 7。C。2a 

139O LUCATE O。 DATA c。27。C。25。c, 27。 18, 25 

14OO PRINT " DATA C。27。c。25。 と 。27。 18。25 

141O PRINT " "sCOLOR 5 DATA ご 。 フフ 。 て 。 25。 に 。27。 て 。29。 で 。2a。 と 2C ッ と) 2@。 で 。 さ O。 6。 2 6。 2C。 18。 さ 0。 0。O 
142O PRINT " LN 1 DATA と C。 了 す 。C。d。 ヒ 。。 ヒ 。d。 に 。 す 。 と 。d。 と 。 季 。 と 。12 

14 さ O PRINT " DATA c。f。C 志 S C。f。 1 日 。d 

1440 PRINT " 0 DATA C。 了 す 。 ヒ 。d。 と 。 季 。 1 日 

145O COLUR 7sLUCATE 12.15:PRINT "BY NAGA" DATA と 。f。 ヒ 。d。C。 季 。 ヒ 。d。 と 。 ヒ 。 ヒ ゥ 8。 と 。B。 と 。 ら 。 ら 。a。 ら 。d。 1 日 。 チ 。0。O 
146O LOCATE 5。17:PRINT "LET'S PLAY THIS GAME!" FUR 1= ま 7FOOD TO 7F6B 

147O FDR 1=1】 TD 7gPOEE *CAOO。 1 : SDUND 】W100。1O:NEXTsPUKE $CAOO。O READ QA*:PUKE 1。VAL ("まり + 人 も) 

1 48O LOCATE 日 。20:PRINT "PUSH SPACE KEY!" NEXT IiRETURN 


PICK に Ks IF K<>32 THEN COLOR INT(RND(1)* フ + ィ 1 ) s GBDT0 1 48O 


還 変 数 リス ト ・ M…… 床 、 宝 の Y 座 標 660-720 右 へ ロープ を 張る : 一 ンク リア な の で す が 、 ゲ ー ム 
S…… ス コア : BO…… ポ ボー ナス 730-770 自分 落下 : 中 に 何 個 取 つ だ か ガ 、 わ か ら な ぐ ご 
MA…… 自 分 の 数 ・ LE…… マ イム 減 少 の レベ ル 780 一 860 敵 和 動 ・ な つて し まい ます 。 そ こ で 、 
T…… タ イム ・ 遼 プ ログ ラム の 説明 870-1050 画面 表示 ・ 315 LOCATE 23 
TX…… 敵 X 訂 標 ・ 100-180 REM 文 ・ 1060 こ 1200 パ マ ター ンク リア : ,. の :PRINT \GOLD? 
TY…… 英 Y 座 標 ・ 190 ユー ザー 定義 、 タ イ ・ 1210-1250 ミス 年 

X…… 自 分 の X 座 標 トル SUB へ 1260 こ 1320 ゲー ム オ ー バ ー  : を 付け 加え て くだ さい 。 自分 
Y…… 自 分 の Y 座 標 200-250 初期 設定 1330~1500 タイ トル 表示 の 取 つ だ 宝 の 数 ガ が 人 数 の 横 に 表 
CO…… 取 つ だ 宝 の 数 260-340 音楽 ・ タイ ム 処 理 等 : 15101710 ユー ザー 定義 、 音 ・ 示さ れ ま す 。 


Kaos ニ スキ ギャン 350 こ 400 自分 秘 動 3 楽 デ ー タ まだ 、29 個 取 つ だ 時 点 で を 上 
X1…… ロ ー プ の XX 座標 410-470 キー 入力 (ロー プ ) : 画 チ ェ ッ クボ ポイ ント か ら ロ ー ブ ガ 降り て ぐる よう に 
Y2…… ロ ー プ の Y 座 標 480-530 上 へ ロー プ を 張る ロー プ を 張 つ て 進む と いう ・ し て も 、 あ お も し ろ い で し よう 。 
rt 乱数 (英和 動 用 ) 540-590 下 ヘ ロー プ を 張る イデ ア な か な か いい で すね 。 と : (エイ キチ ) 
SA 床 、 宝 の X 座 標 600-650 を へ ロー プ を 張る ころ で 、 宝 を 29 以 上 取る と パタ : 


19 WIDTH 89:SCREEN 1:COLOR= (3、。3。4) :RANDO 
MIZE TIME/77:DEFINT A-Z 
29 タイ トル 
39 COLOR 5:CLS:LOCATE 2.9:PRINT" く くく SLID 
E 9 >>>"iTAB(62)j5" く くく PASOPIA 7 >>>" 
49 LINE(37.5)-(121.89),3,B:LINE(38,6 ) -(1 
29,88),3,B 
S9 LINE(38.6)-(54.22),3,BF:LINE(38,72)-( 
S4,88) ,3,BF 
69 LINE(194.6)-(129,22).3.BF:LINE(194.72 
)-(129,88) ,3,BF 
79 COLOR 6:LOCATE 31.9:PRINT"7 8 
9":LOCATE 31.23:PRINT" 1 2 

3『" 
89 LOCATE 17.7:PRINT"4" 53TAB(62)1"% "LOCA 
TE 17.11:PRINT"5"iTAB(62)5 747 iLOCATE 17,。 
15:PRINT"6"iTAB(62)5" 
99 K=1:RESTORE 999:FOR N=1 TO 3:FOR M=1 
TO 3:GOSUB 719:K=K+1:NEXT:NEXT:GOTO 649 
199 ' モ ンダ“ イ 
119 FOR M=9 TO 4:FOR N=9 TO 4:A(M,N)=9:N 
EXT: NEXT 
129 COLOR 4:TE=9@:SOUND 65.5:SOUND 79.5:L 
OCATE 35。11:PRINT "モン タダ ~ イ 7?( 1-7)“ 
139 S$=INKEY$:S=VAL(S$):IF S<=9 OR S>=8 
THEN 139 ELSE LOCATE 35,11:PRINT" 


149 LOCATE 66.2:PRINT" モ ンダ が トイ" 55:LOCATE 66 
529:PRINT"9 テ メ ーー ド " 

159 ON S GOTO 169,179.189.199.299.219,23 
9 

169 RESTORE 849:GOTO 229 

179 RESTORE 859:GOTO 229 

189 RESTORE 869:GOTO 229 

199 RESTORE 879:GOTO 229 

299 RESTORE 889:GOTO 229 


219 RESTORE 899 

229 FOR N=1 TO 3:FOR M=1 TO 3:READ K:A(M 
。N)=K:GOSUB 719:NEXT:NEXT:GOTO 279 

239 FOR J=1 TO 9:P(J)=9:NEXT:FOR M=1 TO 
3:FOR N=1 TO 3 

249 K=INT(RND(7)x9)+1:IF P(K)<>9 THEN 24 
9 

259 P(K)=K:A(M,N) =K:GOSUB 719:NEXT:NEXT 
269 ' コ マ ノ イト ~ ウ 

279 TI=399+TIME 

289 COLOR 5:SOUND 63.5:LOCATE 66,17:PRIN 
T "まり コウ?  " 

299 COLOR 2:LOCATE 66,22:PRINT "タイ ム "iCHR も 
(255) TI-TIME:IF TI-TIME く =9 THEN 679 

3 COLOR 6:C$=INKEY$:LOCATE 72,.17:PRINT 
C 

319 IF C$="" THEN 299 ELSE IF C$="%" THE 
N N=1:GOTO 359 

329 IF C も $="+" THEN N=2:GOTO 359 ELSE IF 
C も ="-" THEN N=3:GOTO 359 

339 C=VAL(C$):IF C<=9 THEN 289 ELSE 499 
349 ' ミ キ ~ 

359 IF A(4.N) く >9 THEN 289 

369 FOR M=3 TO 1 STEP -1:IF A(M,N) く >9 TH 
EN 379 ELSE NEXT 

379 FOR M1=M+1 TO 1 STEP -1:SWwAP A(M1,N) 
>A(M1-1.N) :NEXT:GOSUB 589 

389 FOR M=4 TO 1 STEP -1:K=A(M,N) : GOSUB 

719:NEXT:GOTO 699 

399 "ウエ 

499 IF C<7 THEN 469 

419 M=C-6:IF A(M,9) く >9 THEN 289 

429 FOR N=1 TO 3:IF A(M,N) く >9 THEN 439 

LSE NEXT 

439 FOR Nl=N-1 TO 3:SwAP A(M,N1 ) ,A(M,N1+ 
1) :NEXT:GOSUB 579 
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449 FOR N=9 TO 3:K=A(M,N) :GOSUB 719:NEXT 
・GOTO 609 

459 ヒダ“ リ 

469 IF C く <4 THEN 5290 

479 N=C-3:IF A(9,N) く >9 THEN 280 

489 FOR M=1 TO 3:IF A(M,N) く >9 THEN 499 E 
LSE NEXT 

499 FOR M1l=M-1 TO 3:SWAP A(MI,N) ,A(M1+1 , 
N) : NEXT:GOSUB 589 

S599 FOR M=9 TO 3:K=A(M,N) :GOSUB 719:NEXT 
・GOTO 669 

に ンク 

S29 M=C:IF A(M,4) く >9 THEN 289 

S539 FOR N=3 TO 1 STEP -1:IF A(M,N) く >9 TH 
EN 549 ELSE NEXT 

S49 FOR Nl=N+1 TO 1 STEP -1:SWAP A(M,N1 ) 
5A(M,N1-1):NEXT:GOSUB 579 

S59 FOR N=4 TO 1 STEP -1:K=A(M,N) : GOSUB 
719:NEXT:GOTO 699 

560 『' 

oS79 KX=16xM+49:LINE(KX,8)-(KX+14、86),9,B 
F:RETURN 

S89 KY=16xN+8:LINE(49,KY)-(118.KY+14),9, 
BF : RETURN 

S99 ' カ ン セ イカ? 

699 TE=TE+1:COLOR 4:LOCATE 65.29:PRINT T 
Ei テ メ " 

619 T=1:FOR X=1 TO 3:FOR Y=1】 TO 3:IE A(Y 
yX) く >T THEN 289 

629 T=T+1:NEXT:NEXT 

639 "オォ ワ リ 

649 PLAY"03T129L16AP16AP32AP16L8AP8" , "04 
T129L16EP16EP32EP16L8EP8" 

659 PLAY"03T129L16A#P16AP32A#P16L4AP16BP 
32L16BP32L3C#" "04T129L16FP16EP32FP16L4E 
P16GP32L16GP32L3A" 

669 FOR H=@ TO 5:FOR CL=2 TO 4:COLOR=(4, 
CL,CL):FOR 1I=9 TO 399:NEXT:NEXT : NEXT :GOT 
0 689 

679 PLAY"03L16BA#AG#GF 共 FED#D" 

689 COLOR 6:LOCATE 31.29:PRINT "PUSH RET 
URN'′ KEY":IF INKEY$ く >CHR も (13) THEN 689 
699 LINE(55,7)-(193,.87),9,.BF:LINE(39。23) 
-(119.71).9,BF:GOTO 119 

799 コマ ノ スウ シ ~ 


710-620 コマ の 表示 
640-900 問題 デー タ 


719 IF K=9 THEN RETURN 

729 KX=16xXM+49:KY=16xN+8:LINE(KX,。KY ) -(KX 
+14。KY+14),4,.B 

739 ON K GOTO 749.759.769,779,789,799,89 
9.819,.820 

749 LINE(KX+7 ,KY+3)-(KX+7 、KY+1 1 ) 。2:RETUR 
N 


759 LINE(KX+4 ,KY+3)-(KX+19.KY+3),2:LINE 
-(KX+19,KY+7),2:LINE -(KX+4。KY+7) ,.2:LINE 
-(KX+4.KY+11).2:LINE -(KX+19,KY+11),2:R 
ETURN 
769 LINE(KX+4,KY+3)-(KX+19.KY+3) ,2:LINE 
-(KX+19,KY+11),2:LINE -(KX+4.KY+11),.2:LI 
NE(KX+7 。KY+7)-(KX+9,KY+7) ,2:RETURN 
779 LINE(KX+4。KY+5)-(KX+4.KY+9)。2:LINE - 
(KX+19,KY+9)。2:LINE(KX+8 ,KY+3) -(KX+8 。KY+ 
11) ,2:RETURN 
789 LINE(KX+19,KY+3)-(KX+4.KY+3) ,。2:LINE 
-(KX+4.KY+7).2:LINE -(KX+19,KY+7) ,2:LINE 
-(KX+19。KY+11),.2:LINE -(KX+4.KY+11).,.2:R 
ETURN 
799 LINE(KX+19、KY+3)-(KX+4。KY+3) ,2:LINE 
-(KX+4.KY+7),.2:LINE -(KX+19,KY+11 ) ,2,.B:R 
ETURN 
899 LINE(KX+4.KY+5)-(KX+4。KY+3),。2:LINE - 
(KX+19.KY+3).2。B:LINE -(KX+19,KY+11),2:R 
ETURN 
819 LINE(KX+4.KY+3)-(KX+19。KY+11).2.B:LI 
NE(KX+5,KY+7)-(KX+9,KY+7 ) ,。2:RETURN 
829 LINE(KX+4 ,。KY+3)-(KX+19.KY+7).2.B:LIN 
E -(KX+19,KY+11) ,.2。B:RETURN 
839 "モン タ ~ イ ノ テ ~- タ 
849 DATA 4.2.3.7.5.6.1.8,.9 
859 DATA 1.2.3.8.9.4.7.6,5 
869 DATA 2.3.4.5,.1.6,.7,8, 
さて エエ て エス エエ ズ エ メ テ エ テイ ズ イズ. 
879 DATA 3,.6,.9,2.5,8,1,4。 
人 】 SLIDE 9 
889 DATA 8.3,.4,.1.5,.9,.6, 
・* 半 by  K.T 
899 DATA 9.8.7.6.5。.4.3,2,1 
人 。: "84/8/19 ※% 
999 DATA 1.2.3.4.5.6,.7,.8,9 
ま よさ スエ イエ そそ エエ ャ そそ エイ エエ ャ そそ イィ 
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9 
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よ 。 10 行 の COLOR= テ ( つ ,3,4) 
を と る 。90 行 の うし ろ の GOTO 


圏 チ ェ ッ クボ ポイ ント ・ 文 の 飛び 先 と 290 行 の うし ろ の 
な か な ガ お も し ろく こし あ が つ ・ IF 文 の 飛び 先 を 680 に する 。 640 
て いる ゲー ム だ ね 。 だ だ ハイ ス : 行か ら 670 行 を か カルト する 。 だ だ 


コア が な い の が 残 意 だ 。 名 問題 


P( )…・ 乱 数 関 題 (問題 ) 作 ・ 


CLEAR 59.&H7F4C:RESTORE 
29 FOR I=@ TO 111:READ A$:P 
OKE I+&H7F4D,VAL("&H"+A$) :NEXT 
39 DATA 91,98.99,11,.B8,.7F,C 
D,B7,95,21.89,18.CD,F7,.95.C9,9 


田 変 数 リス ト 成 用 
SS は 手数 T…… 完 成 判 断 用 
S……* 問 題 番号 ・ K…… コ マ の 数 字 READ 用 
A(,)…… そ の 場所 に お ける コマ ・ プ ログ ラム の 説明 
の 有無 と コマ の 数 字 : 10 初期 設定 
M.N.M1 ,.M2…… 盤 上 の 座標 : 30-90 画面 作成 
KX,KY…… コ マ 表 示 、 消 去 の ・ 110 一 250 問題 の 選択 
際 の 座標 ・ 270-580 コマ の 物 動 
C$S,C…… キ ー 人 入力 用 600 一 620 完成 判断 
ーー タイ ハム 表示 用 640-690 デモ お よび ゲー ム 終 ・ 


ゞ 時 の 表示 


リス ト 


9.99,99.99.99,.099 


1.91.99,11.B7,7F,3E,49,12.CD,F 
7,95.C9.91.98.99,11.B8。7F,21.,9 
8.99,CD,B7,.95,11.C9,7F,21.B8,7 


F,96.98,AF 


ざ 


を 何 手 で 解い た ガ 、 あ る い は 何 ・ 


し これ だ と ゲー ム が 完成 し だ と 
き 、 感 動 び うす い の で 640 行 ガ 


秒 で 解い た か の 表示 が 残 つ て も ・ ら 670 行 の 間 に 完 成 ア デモ を いれ 
よ か つ だ の で は な いか ガ な 。 話 は ・ る と よい ね 。 (22 9 
変る けど パソ ピア を 持つ て いる : 
人 は 次 の 点 を 変更 すれ ば 遊べ る ・ 


6,CD,AD,7F,CB,6E,CD,AD,7F,CB,6 
6.CD,AD,7F,CB,5E,CD、AD,7F,CB,S 
6 ,CD,AD,7F,CB,4E,CD,AD,7F,CB,4 
6.CD。AD、7F 、23、08B。C2.7F,。7F。C9.C 
4.B4.7F,12.13.AF,C9,3E,91.C9,.9 


XR の 


19 HI=10999 

29 COLOR15,1.9:M=192:V=152: 
SC=9:KC=3:EX=1999:LOCATE 21.9: 
PRINT HI:DO=1:AMOVE 29,(M,V) :H 


=&H74C9:LE=29:SOUND 4,1999:GOS 
UB349:PLAY"V19" 
39 FOR K9=2 TO 11:FOR K1=29 


TO2 1 


49 SP=LE:X=18:Y=2:GOSUB 119 
:SOUND 5,7 


S9 GOSUB 99:GOSUB 179:GOSUB 
289:GOSUB 259:GOSUB 289:SOUND 
4.1999-Bx3:COORD C,A,B:GOTO59 
69 GOSUB 359:NEXT:NEXT:LE=L 
E-5:IFLE=9 THEN LE=29 

79 FOR K9=16 TO 144:AMOVE 8 
9。(192.K9):PLAY"N"+STR$( 45+RND 
(6))+1“"L32" ENEXT:LOCATE 2.29:PR 
INT "BONUS 1999":KC=KC+ 1 :GOSUB 


359:GOSUB 349:SC=SC+1999:DO=DO 
+1:ANIMOFF89 
89 LOCATE 8,9:PRINTSC:GOTO 


39 

99 S=STICK(9) : X=X+(S=3 )x(X く 
22)-(S=7)x(X>18) :Y=Y+(S=5 ) x(Y く 
19)-(S=1)x(Y>2) :Z=Y+(X-18)x18+ 
31 

199 AMOVE 19,(Xx8,Yx8):RETUR 
N 

119 C=(RND(3)+5)x19:R=RND( 99 
)+33:COLOR1 ,9:LOCATE 9,9:PRINT 
CHR$( R ) 

129 CALL &H7F6A 

139 Q=&H7FBF:FORJ=2 TO 16 ST 
EP 2:FOR 1I=1 TO 15 STEP 2:Q=Q+ 
1 

149 FOR L=9 TO1:FOR P=9 TO1: 
LOCATE 1I+L,。J+P:PRINTCHR$(PEEK( 
Q)x197+32) : NEXT : NEXT 


十 ド キキ エエ エエ イオ 


159 NEXT:NEXT 

169 ANIMON C,(192.16)-(192,1 
44) ,SP,.DO:COLOR15:COLOR, 1 : RETU 
RN 

179 IF ATTACK(9)=9 THEN RETU 
RN 

189 XY=Xx8+Yx256+8:POKE H+1, 
XY MOD 256:POKE H+2.XY/256:CAL 
L &H7F4D 

199 COORD C,A,B: ANIMON 1 ,(20 
3。152)-(A+T11.B),1.3 

299 50=3:S1=2:GOSUB 369 

219 COORD C,A,B:IF B く 9 THEN 
RETURN 

229 IF Z く >R THEN PLAY"NS59L8" 
:SP=SPX8/9:ANIMONC,(A,B)-(192。 
144),SP,.DO: RETURN 

239 AMOVE 99,(A,B):ANIMOFF C 

249 COLOR,,6:B=179:S0=3:S1=1 
5:FOR I9=9TO15:GOSUB 369:NEXT: 
ANIMOFF 99:TE=TE+1:SC=SC+(C- 49 
)x499/B:LOCATE K9.K1:COLOR19:P 
RINT " 多 "ECOLOR 15:LOCATE 8.9:P 
RINT SC:RETURN 69 

259 FOR I=9 TO 2 

269 L=&H2219+RND(128)+RND(16 
)x256:POKE H+1,L MOD 256:POKE 
H+2,L/256:CALL &H7FSD 


279 NEXT:RETURN 

289 COORD C,U,NEIF N>9THEN R 
ETURN 

299 ANIMOFF 29:AMOVE 49。(M,.V 
):COLOR。,6:S1=15:S0=3:B=9:GOSU 
B 369:ANIM OFF 49:AMOVE 209,(M, 
V) :KC=KC- 1 :SOUND5 ,9:GOSUB 349 

399 IF KC く <>9 THENRETURN49 

319 FOR I=59 TO 4 STEP-3:PLA 
YY"N"+STR$ も (1)+"L16V12":NEXT:LOC 
ATE 5,19:PRINT"GAME OVERII PIEIE 

SC>HI THEN HI=SCELOCATE 3,11: 
PRINT"YOU GET HIGHI" 

329 LOCATE 5,14:PRINT"PUSH R 
ETURN":IF INKEY$=CHR も (13 )THEN 
29 

339 GOTO 329 

349 FOR K2=2TO11:FOR K3=29 T 
0 21:LOCATE K2.K3EPRINT" "ENEX 
TK3, K2 

359 FORG=9 TO 19999:NEXT:COL 
OR,,1:LOCATE 8.9:PRINT" 62 
LOCATE 8.9:PRINT SCE:LOCATE 15, 
22:PRINT KCE:LOCATE 15.29:PRINT 

4-LE/5: RETURN 

369 SOUND 7,S1:SOUND 6,S0:SO 
UND 1.12:FOR I=9 TO 189-B:SOUN 
D 4.1I:SOUND 9.1I:NEXT:SOUND 7,9 
:SOUND 1.9:RETURN 
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(へ 庄 ) に くさ と 層 す 科 さ さ ( 
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較 賠 闘 園 結 
| | | 」」 
オオ 
較 騰 較 較 開 | | | 
還 Eh 肖 
内 
| | | | | | | 
HHTHHHHTHHT 上 還 
HH 扶 失 
3 [| 」 SIZE 1.2 
時 | HH - 半 COLORD 
| 
寺 10 留 男 較 | | 
SIZE 小 け 二 当 
COLOR 4 け 二 H 
| | | | 
| 
| | | | 
賠 図 司 
| | | | 
圏 圏 田 
照 圏 
#20 二 
SIZE 2.2 
COLOR 3 


時 
日 


#40 
る ZZE 2.2 
COLOR 6 


| #50 


還 交 数 リス ト (リス ト 2 ) 


CO ereteo ジア 電 交 ア 
HI…… ハ イス コア 
LE…… レ ベル 


KO…… 自 機 の 数 
AB-… 敵 の アニ メ の 位置 
(> wave 3 ee 敵 の 種類 


ト 数 

TE…… や つつ け だ 敵 の 数 

グー 閣 え の キャ ヤラ クタ ナン 
バー (ノニ 問 題 . 
解答 ) 

らい ステ ィ イツ グ 用 

2 Pte カー ソル の V-RAM ア 
ドレ ス 

屋 Y 自 機 を 1 機 増やす の に 
使用 


KO0. K4… 


H,O ーー 


カ 寺 村 COLORC 


… サ ウン ド 用 

アニ メ ナ ン バーO の コ 
ー ド 

… メ イン ルー プ 
アド レス 番地 用 


還 プ ログ ラム の 説明 


10- 40 
50 
60 
70 60 
90 一 100 
110 一 160 
10o220 
220 
230 一 240 


250…-270 
260 

290 一 300 
310…330 
340-350 


初期 設定 

メイ シル ー チ テン 
ルー プ と じ 
団 船 6 ボー ナス 
照準 物 動 
問題 の 出題 

ミサ イル 発射 

当 だ だ つ だ か 

敵 を や つつ け だ と き 
の 処理 
問題 用 サブ ルー チン 
自 機 が や られ だ か 


や られ だ と き の 処 理 ・ 
ゲー ム オ ー ル ーー 処理 : 


画面 表示 


#70 
SE 2 
COLOR 4 


SLZE . 交 
COLOR A 


COLOR 6 


360 ワン に ブル ー チ 


ッ 


較 プ ログ ラム マッ プ ( マ シン 語 部 ) ・ 


〆 に 2 アン /FS0O アー ハリ) 
に 文字 デー 
を 秘 す 
V-RAM ヘ へ 
の 書き こみ 
(0.0) の キヤ 


/FODー/F6S 


/ZFOA 一 /FBO 


ラ を 7FB8 ・ 


ガ から の 8 ど パ 


イト に 格納 、・ 


進数 に 変 


換 し て フ FO : 


0 以降 に 格 
納 す る 
男 ワ ヴー クエ リア 
/FB/ メイ ン RAM ガ らい V-R 
AM へ の カラ ー 転 送 
メド BB /FBF (00 の 
RAM か ら 


メイ ン RAM 
へ の 転送 
(0.0) の V- 
RAM の アド 
レス を 2 進 
数 に が ガ え る 
還 プ ログ ラム に つい て 

ご の ゲー ム へ は 、 マ シン 語 読 み 
込み プロ グラ ム (リス ズ スト 1 ) と 
入 イシ ンプ ブロ グラ ム (リス に ビジ) 
の の つの プロ グラ ムカ か らら 成 だ 
SC の の 7 に 反 デ プラ 
る 場合 は 、 リ スト 1 の あと に 、 
に の ピ ッッ チチ ヤー モー に の 
作成 し だ だ 0 ツタ グ ラク ドク ラッ 
イッ ツク と いつ し よ に SAVE A 
LL 命 令 で セー プ し て こく だ さい 。 
プロ グラ ハム を 走ら せる に は 、! リ 
スト 1 を 読み 込ま せ RUN さ せ 
だ あと 、LOADALL 命 令 で O 
KC で 9 (プー) 


フ FCO~- フ FFF 


19 SPRITE ON:DEF SPRITE 9,(1 
1.9,9.9)=CHR$ も (169)+CHR$( 161 
)+CHR$( 58 )+CHR$( 59 ) :DEF SPRI 
TE 1.(3。1.9.9,9)=CHR$( 189)+C 
HR$( 181 )+CHR や も (182 )+CHR$( 183) 
29 DEF MOVE(9)=SPRITE( 9,3,1 。 
128.9.9):DEF MOVE( 1 ) =SPRITE( 
S。1。1.96.9,9) 

39 CGEN 2:CGSET 1,1:PALETS 1 
9.53。5,21:L し =1 

49 ERA 9,1:SPRITE 1:CLS:VIEW 
:LOCATE 9,21:FOR 1I=9 TO 55:P 
RINT CHR$(195 ) : : NEXT : R=RND( 2 
3)+1:LOCATE R-1 ,21:PRINT CHR 
$( 209 ) :CHR$( 298 ) : CHR も (298 ) :C 
HR$(291):X=64:Y=178:Q=9:W=-1 
り -Lx5:N=1:C=9:SPRITE 9,.X,Y 
S9 LOCATE 19,.22:PRINT "LEVEL" 
5L:PLAY "T4M9V1502C7D7E7B3B9 


69 K=STICK(9) :Q=Q+((K=1 )-(K= 
2) )xL:X=X+Q:W=W+(STRIG(9)=8) 
XLX2:Y=Y+W:W=W+L:IF Y<-19999 
OR X<-19999 OR X>19999 THEN 
GOTO 199 

79 IF X<@ OR X>249 OR Y<9 TH 

EN SPRITE 9:V=8:GOTO 199 

89 IF Y>178 THEN Y=178 

99 SPRITE 9,X,Y:V=6:GOTO 119 
199 LOCATE 19.23:PRINT XiYi: 

LOCATE 19,.23:PRINT " 


119 IF Y<178 THEN GOTO 149 
129 IF X/8-1<R OR X/8>R+2 OR 
W>16 THEN GOTO 199 

139 GOTO 169 

149 C=C+N:PALETB 2.9.48,.39,V 
+C/4X16:IF C>11 OR C<@ THEN 
N=N※- 1 


159 GOTO 69 

169 LOCATE 5,23:PRINT 
PUSH A OR B": 

179 SPRITE 9,.X,178:POSITION 


"ナイ スゥ ! 


9.X,174:MOVE 9 

189 PLAY."T1M9V1504C3C3C3A7“ 
・GOTO 239 

199 LOCATE 5,23:PRINT 
PUSH A OR B'i 

299 IF X<9 OR X>249 OR Y< く 9 T 
HEN GOTO 229 

219 SPRITE 9:SPRITE 1.X,178: 
POSITION 1.X,178:MOVE 1 

229 PLAY "T3M9V1509ASGSFSESD 
d" 

239 IF STRIG(9)=8 THEN L=1:G 
OTO 49 

249 IF STRIG(9)=4 THEN し L=2:G 
OTO 49 

259 GOTO 239 


" ド ヘ タ ァ ! 


12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 
0 
1 
2 
3 
4 
5 |pso lp4o Fio |Fio | 5 
6 C70|A00 70 | C1216 


mrm rue 
8 A00 1D70 
9 D401D70 
101D50 | A101A60 MA10IA60|C70| A00| D70 F51 
| | | pm ロロ ロロ コロ ピ 
50 |A10 |A61 lc71|A00|970| |F41lF51lFS1 F5L!FS11F51 IF61 A60 [1C70 NM A60 |C701A10 
mairemleee | 還 milmlmgm | | 
拓 


国 [ 
A02 A02 |A02 1A02 は 9 


EEEHEICICID 


SI ド S930 
A021F33 |F33 1A121A021F33 」F33 1A12 |A02 


品 | mm | 


A13 |A23 |A33 開 半 
0 A23 |A03|A13 19 


Sa D42 1D42 


0 オ 妥 まま を 5 6 ?2 8 の 30 0 19 20 21 22 23 24 25 26 27 
画 変 数 リス ト N.C.V…… パ レッ ト 用 人 変数 る 如 種 処理 、 自 分 の : ン ル ー チ ン 頭 へ 

No 自分 の 座標 ・ 一 プ ログ ラム の 説明 移動 1060 一 1860 着陸 に 成功 し た と き 
O.W…… 自 分 の 移動 の 際 の 増分 : 10 スプ ライ ト 定 義 100-110 画面 を は げ れ だ と き : の 処理 

AO ・ 20 ムー ブ プ 定 義 の 処理 190-220 着陸 に 失敗 し だ と き 
R……RND 用 ・ 30 一 50 画面 作成 ・ 120-130 着陸 成功 か の 処理 

K…… キ ー 入 力 60- 90 キー 入力 、 座標 こよ : 140-150 パレ ツ ト 処 理 、 メ イ : 230-250 リプ レイ する 


ざ Z 


2 


UMO) 
sh > 


導き 


9YrreYrr9」 ひ さび よせ (W 計 ) 


"へき さ 等 表 ペー ユキ さき (( er 


ここ | 


に くさ は る ら 臣 決 さき 届 へ 」 NAV 2。「 ( 左 一 さめ 辻 中 人 
A 


ed で て 革 び き 党 


ー パ ひど 」 一 


(へ 凌 )「 一 きく 六 さ 
ご て て 須 党 ) て ペー ペー メー の 室 ま びき 定信 さ (・ 
沙 ・ 誤 半 )『 叶 テオ ョ ーー ー「 


TrNJY( 7 


Q 
Q 


OADOOOOOAOOOOOOOAOOOOOOOAASOOO 
OO 
OO 


FM 


18 PRINT "tttBOXIR 
ロナ "BUSUB 的 
:PRINT "(Highy〉 
> Js50SUB 礁 

2 PRIHT "Chammp- 
ji 7 - inUSUB 

日 ピロ ニニ. 

30 由 5 暗 :-50 提 EK こ 5 

昌三. 日 ロコ. は ニー 
F 9=" gaCh 
は 上 |( コ 

4 PRINT "5 ま ka- 

-PBI"3s50SUB 約 

:PRINHT "Ho--Y 
| * 旨 ssOS ま 
』 

38 FHR =1 F0 計 勾 
SUB 89iPRINT CS5 
R 5 RTis5USU 
H 9:L=/5D=9 

59 FHR = TH WT 
=299sTF KEY=" 
iD-D-1 

表 F KEY="6"5D=D+ 


ュ 
39 E=INT (RH 昌 失わ : 
IF E= 邊 し キー】 
1 暗 FE お し =Z 
118 IF 19jD-9 
29 IF LDL=Z5D- サ 9 
138 F=iNT R 和 3): 
IF KEY に = iRU5U 
HB 39 
1 旨 TF ET= "9"iBOSU 
H 38 
158 IF Es5iF Ez3jh 
05S 多 479 
169 EF EziL=5sIF H 
>Zj50SUB 8:IF 
中 邊 DOSUB 0 
19# RUSUB EiF HzB 
j50SUB 5608:5ATO 
ZD9 


還 変 数 リス ト 


9 iF HzM5EOSUB 53 

9 IF HIF BMN 
Eal AkiPRINT EPR 
NT LSE 11 "*: 
Maf1 Ei 
WEAT 5 

zS0 ROSUB 9:iF H 消 
jiF H 衣 「HEN 

z 旨 PRINHT "EHPEEI 
ト HzWsPRINT 時 5 
HL! 

人 HHsPRINI 4 


と bB 0T0 9 

ri PRINT Hante1': 
jiF HBiPRINT HU 
Ha 

zBW IF HzBiPRINT 9 


9 SUB 9iPRIHT 
EScare1"iBi:BH 
SUB 9:PRINT 唐 
"PIT KaCh1': 

3 暗 5HSUB 料 : 時 1 
jF 時 iPRINT “ 
* HO0i *"5sH に 
shUSUH 9 

3z6 iF HBsPRINT " 
Hert( )ha 和 We) ji ロ 
HSUB 約 :5OTO 3 

338 EF 5zJj 『 有 EN 3 礁 

34 答 J=iPRENT 「 (Hi 
3n-Sc (PTEBUSU 
F 埋 

2 iPUT すす を 性 生 で 【 
5 

359 FLEN(E6)53 FH 
FN 398 

| 時 HiF 人 - 

ndii Ti :END 

| 58808 #iiPRINT 
LSR D- お "0 に 


加 用 
0 相手 の パン チカ 


Bo 自分 の パンチ ヒッ ト 回 数 ・ 


499 iF 上 = 1F [=D-) 
PRINT [5R 上 -1: 
"750"fsIF B299『 
EN 468 

418 IF D-5EiPRINT 
ESR Di 9" 
Hi ご ) 思 し 日 リュ a ト 
時 1 

78 RUTO 468 

43 介 G0SU #i:PRIHT 

LSR D-15 "99: 
すす IF = 時 FI 上 =D-? 
PRINT [SR 上 -1: 
AA ト H ュ 15 條 
HEMN 4 
4 け - 了 ー し MM 
LSE け - 邊 * に 
:B-B-20: BB 
= 1 

58 時 -5:RUTO 55 

人 介 FE= 昌 上 E+1: 国 
HH 4 

科 # FE ュ >2jL=D-3 

498 GOHSUB #1:L=RN 符 
*SiEF EK15 「RINHI 


LSR LE"E0 ii50 
日 319 

J99 PRIHT ESR Ei "5= 
"jsB-H-J 


319 IF KEYT="SYEPRIN 
1 LOR DS 09 "iiU 
=H+1EIF BSiIF 
Hi 「HEN 559 

se9 iF KiI 「 用 N 3 


JJ9 IF は 3=DiPRINT 


LR LEDO 人 「 5 
: 時 1 
っ J9 FUR 5= 間 「『 有 0 5WsH 
EAI 5:PRINT iRE 
HHR 
7 0 し ニ Dー リ 5 PRINT 
LSE LIP0770W= 
HH-2- 
300 - 村 +19:HUTH 559 


・ 〇 … 自 分 の ガー ド 回 数 
5 
ee 起き 上 が り 判 定 と 体力 増 


RE ダウ ン キ ャ ラク フタ 
US.V$…… 勝ち 内 け メッ セー : 
ジ 
T…… ラ ウン ド 数 
に 8 相手 の 位置 


5 旨 RUSUB 示 :PRINT 
LSR Di jihUS 
HB 幸 :PRINT ES 
5: ロ UTU 5 
bi9 RUSUB 培 :PRINT 
98 し -15 0 ikH 
J5UB 料 : PRIHT 』 
SR し ー111D()5 
5J# RUSUB 約 :Y=GsF 
JR R=1 HH 1 
5D9 ijF HB5PRINT 5 
は H ) 則 5P 
RINT LSR 65 5 : 
5 BeBsPEINT CS 
R 四 に F HP 
RINI LGSR Bd : 
bB PRINT SR i キ / 
ji ロ USUB 培 :PR1 
MI COK 1 5F 
RINI LSR Ri 
n96 IF KEYSTR' THERN 
し 
IF KEI9 IF HEB5 
IF 7 昌幸 / 
KtH=HTREK ポ ボ ィ sh 
HTU 晶 
2B USUB 堆 : 上 ERTR 
:EIURR 


16 IF 0-5i 時 1 

29 PRINT :PRINT CS 
R iPCSR 11i 
ESR EYEVTE 
SR 0"9"iiRETUR 
N 


1 FUR 時 生 F 表 作 
IT asREIURR 


18 FHR た TH 98 
HEAT iPRINT KR 
EEURN 


・ D…… 自 分 の 位置 


一 プロ グラ ム の 説明 


10- 40 初期 設定 と マイト : 


60 一 70.130-140 キー 入力 


『…: 


に …4 


IF DR65PRINI LS. 
KJ115) iLSRU 


し W 』| 


PRIHT ESR ED 


Le 


itWSPRINT ESRI 


1 ILSR 上 115 


CR 


KCI 


(DDiCN 0 WID 


3 ゅ 」 


『 は 0 し 


に 


Pe 


1 5 4 


Eo4 に 0 っ 
し 」 


いこ) 
に 


150-160 相手 攻撃 判断 
160-190 ダウ ン 判 断 

200 ラウンド 終了 表示 
230…280 勝ち 負け 判定 表示 


290-320 スコ ア 、 勝 ち 抜 き 数 


表示 
990eS30 0 この ーー 
390 一 460 自分 の 攻 加 


18 PRIHT :PRINT 中 
i-5c。 生 販 W)5150 
SUB iPRINT "B 
ッ YKWiI5090 
B 

19 時 = に 1B4=Yae 
HH コト 
KT= 昌 = に 1 
9-Y45iBOTO 598 


79 1』 EEY='3TIR0SU 
B 5 内 5 ニ 5+1 
Hi 0 KEY GUSU 


“T1 


md に 家 1 よい 
GO : 
トト - 


iLSR RiD ま 5LSK っ 
i 昌 5 
33 PRINT ESR 5 
SE HsTG SR 
s-HiHS3ESR 1 「 


+ す 『 さ 
5 F ロ =5-15iF 時 = 
EK=KT1 
表 F 呈 1 紅 汗 丘 
= T) FHEH 3 


HEN 499 

3 昌 時 日 放 15 
ピロ H 

233 計 5=1iiGUSUB 
iiUTO 3 

36 IF BB=ht1iIF 
ロー『 ロー 


37 F BSIF 上 = 昌 B 


= NT NHN*(7Z- 
Wa151jiiF ロ 和 15H 


1 由 
183 FE SHEEF KEY 
上 1IK ニ K-3M 


470-530.570~580 相手 攻 軸 

550 ルー プ 
・ 600-720 ダウ ン 
・ ロ 1 画面 表示 
P8. P9 ルー プ 
・ 圏 チ ェ ッ クボ ポイ ント 
・ 。 パン チ の 感じ の よく 出 て いる ・ 
: ご の ゲー ム 。 ステ チップ は ば 、 ちょ ・ 


1 jF E キ WE=F-! 

1 時 5UEU 9 

9 FOR =1 EN 肝 

5- で - 介 (上): 陸 6-V 

* ドーEEETUR 
N 

REaT PREIURN 

3HW PREINE LSR Bi 時 
jsGHSUB # き 4 PRIN 
1 ESR iM iRU 
siHB 4 


1 
中 ま j= ロ i 
229 NEE EEF 
NN 2 
338 5UTU 39 
4 只 PRINE LESR 5iH$5 
:5HSUB #4EPRIRT 
SR 53 "XY35G05 
HB 3 
1 上 トニ ト -. コ IF [= 5 
HEN 巡 
3MW FR iR TH 8 所 
=1NT 「RHN 拉 4) 
HH、 す 4 日 
= 時 "HHTH ? 
5 上 HR 1 提 電 
H8==-3ITF HI) 
ニュ ーー 日 1 1 ニ モー15 虹 
EiHRR 
5 ME EEF 5j8iS 
=WERETURH 
nH REFURN 


9 FOR 9 10 1HP 
RINT CSR 
MERT 1 
15 K-K36:IF に 時 K 
=K+1MM 証 ニキ 1 ミ F 
RTIK ニ KT28iT- 


1 


・ うど 1568 ス テッ プ だ けど 、 うま 
・ ぐ 削 つて 、 ス テッ プ を 稼ご う 。 
・ ゲー ム が 終わ る と 、 リ プレ イ は 
・ いち いち RUN さ せな いと いけ 
・ な い の が 不便 。 PO 370 行 を 
・ PRINT ヾ “:Game e 


hG こら OLO 人 # の と し 
よう 。 (だ けち や ゃ ん) 


11EEF TEENZZ 
1.3)*1H0 FHEN 3 


3 KK 呈 “で に! 
r、 っ 感 
生 ss. 用 中 』| 
LR 
Cc 。 ……4 
L 』 
ー。 中 
の て 2 
し | 
っ に 
に m ーー 
し ーー」 
[=」 記 
居 っ と 


に 3:RETURN 

に 時 絆 1 5 日 1 昌 ー 
し ます 5 FN に 
3 りー 

5 PEIHT EPRINE “ 
RONUSTIF*28 時 ド 
=K+F*2GgiBUSUB 
=4 

5a iF 4 THERN 説 

記 PRINT ) TRGE" 
-NiiRETHRR 


6 
1 
"すす | 
に っ 
… 
[Co】 中 
4 
ゃ の -p Lo 
1 
eee 
に 
Lt 


ae! 


本 RINT * HH 旗 時 
ERITPEIRUSUE お | 
[ 時 邊 PRINE 
mERY gUDD: 
58 5HSUB SFRINT 
は き に SLHEE TE 5 5 jU 
ご き 』ihUSUB 5 
お 間 [を まま すす 3 も す に 
Ki ENPHT "INPUT 
1 | を 1 を ま 
PRiHT * 計 PLHH 
Ti50 昌 畔 


FOR に 日 15M 
ET iPRINT 計 
1 URI 


of る @: 
NM 


き 


ト ィ 


ーー で 一 
NvC」 党 


に 1 
1 
w 
プ o 


「 1 て さ き 
リ りー ヤセ く 
雲 )『N マ +1」 る C」 ひ すう ( 補 菜 ) 


s て TI 
ン や 


(ひる ずい 党 


』 
の 


) リー >」」 ひ どす びあ 人 S 


や を ごい) 
エ Le ー さ 
14 ! ーー 


半 


aa 


深 紀 ・ 部 


で っ 


+ 


レア 4 


人 な る CA がき の ぷ ぶ 交叉 


「rー 一 


(へ 問 ) と 性 デ と ( 難 ぶ 謀 
1 


Q 
いつ) 


いつ) 
2. う 


し 


和 


きっ へ て の rm い yreyey)「- っ お び 


(いと ニ 


本 | 
時 『 一 洲 く 光 < 一 光 さ えす えさ キ 』 き ーー ドリ さる びり 


( 痛 寺 っ 


COO 


六 」 一 NVY 
2 と は (W 藻 ) 


ーッ 


No ビ さい いい 冠 難 


「 へ 履 び 半 台 一 ば 


Pu NNW う 


Na 
に | 
ァ ピ 


(ひび S 党 
「 エ ーッ yk て 


〇 


男 安 数 リス ト 
$…… タ イト ル 文 字 用 


、 ア マ 選 択 用 
W( )…… ハ イス コア 


前 
AS…… ナ ウシ カ の キャ ラク 


B$.C$,D お お …… オ ー ム の キャ ヤラ 


クタ 
N…… ス テー ジ 数 
K 内 の 条 ゆ , 

T…… オ ー ム 救出 数 
F areie ダメ ー ジ 数 


り …… パ リア の 残り 数 


O( )P( )OR-… ひ オー ム の 卒 : 


M…… ワイ ヤ ・ バ リア 表示 時 間 ・ 


PH 
10 上 =90iF= せ 5 ロー 電 うー 
も ここ k 衣 症 放 た 


F19 

15 4 ・ PR 
="。 1 1 計 18 
0=9i-Y=.1 


Z8 PRINT "* RLLY 
2 HPER。 By 
は) 
JH=50sH- 析 し =HiD= 
4 邊 sE=985( に ENT 
RHN98)+1EP=IN 
1 (NRH 特 98)+1 
ZD 上 = 半 25H9 ニ リキ 
中 
Z9 PRINT EPRINT ES5 
R 37[TLSR 195 
"1 5LOR 半 ます ( 全 ) 
jLSR 5jH$j 
39 IF BEINEI DiIFH 
-jNT LE45IF iNET 
し -Hz4iPRINE ES5 
R INT し -HTG5 "を" 


IF 80PRINT ES 

R 115 "6 

32 IF RODiPRINT CS 
3 だき 

33 IF BPIPRINT ES 
1 4: 

34 IF BDPPRINT CS 

Ri LT 


・ : 折 寺 の ウキ 2 70 の キキ 
LlL.JOJ…… ル ー プ , マ タイ トル 用 ・ 
・E…… 居 炎 を 出さ な い 時 間 
・ 圏 プロ グラ ム の 説明 

oe 。 ハイ スコ アラ ー の 名 


ラン タダ 


1 10 ダイ トル デモ 
12- 15 プロ ・ ア マ 選 択 


16 ハイ スコ ア 表 示 

19 初期 設定 

AM イン ルー チン 
200…40、 2 デー バカ 


50- 55 画面 表示 
60 バリ アル 防御 判定 
70~ 80 火炎 命中 判定 


90 バリ ア ・ ワ イヤ 消 ・ 


去 判定 
93 救出 判断 
96 9/ 火炎 移動 ・ 出 現 


36 IF B=PiIF H-0z4 
iiF H-Hz4sPRINT 
CSR 0-HH5i*sP* 

31 iF 有明 IF 時 PiB 
SUB #2:B0TO 25 

38 前 DE IHT バ EZ33) 
+ 中 

39 iF 05TF B-5i 1 
F H-Fz4iIFF-Hz 
jiPRIHT ESR『-H 
1 5 

4 IF 時 INTEiIFB 
=INHT Di50SUB 
0T025 

5 IF 上 =1iIF 時 35 
SUB #t:GOT0 35 

55 IF ME に ="575 時 T: 
[日記 : 日 ' 三 い 2 

69 iF Hy1iIF KEY=* 
HL Hi コ | 
HEI2 HI 壮 」IAH」 
=1 

19 IF HK99iIF KEY= 
も に コニー 
1i 時 間 -15TF 1 
) 

0 IF BK99iIF KEY= 

HL HE 

kt=LtlEIF LE)25 

し = 

IF By1iIF KEY=* 

2 時 45B=B-1 

中 = ニ ト -13 EE 羽前 


ー う 
ご と 


CE 
に っ 


100-106 話し 合い 
200<210 ワイ や ヤ 出 現 判定 
300 て 330 オー ム が ガ や られ だ 


400410 ナウ シカ が や られ だ : 
500 ナウ シカ ・ オ ー ム の : 


座標 設定 
600-620 ナウ シカ の 右 移 動 


: P1 得点 と ボー ナス お よ の 面 : 


2 ル ワ 


> 月 ら ゲー ニム オー バー 
・ P3. P4 ルー プ 

- 園 チェ ッ ク ボ ポイ ント 
・ 残り ステッ プ 数 は 38 ス テッ プ : 
: と 少な いら 、 改 造 は 昔 し いね 。 : 
・ タイ トル デモ を 簡単 に し た り 、 : 
プロ グラ ム を 整理 すれ ば ステ ッ : 
・ プ は 稼げ る よ 。 ・ 
・ 。 オー ム を 救出 する と き 、 プ ロ : 
・ 用 と アマ 用 で 得点 が 同じ な の は : 


08 IF の IF INHTL 
=FiHF ENT D=BiS 
=5+29 電 55UTO 149 

119 IF KDE ニ L-Y 

120 IF HELL1Y 

138 IF BCD5D-#-Y 

35 IF BDD=DtY 

1 韓 上 下 -.6iIF EK15B 
HSUB #1:B50TO 75 

159 IF 5 に け -1 

169 BOTO 2 


1 

1H FOR /= 有 FU 15P 
RINT LSER 4 0 >1 く 
OR 邊 の う XE Ts 
EAI Z 

z8【F HB 『HEN 3 朝 

JPRINHT ESR 本 "5 
PP iiBUSUB 99iPR 
NT LSR 5 "8 
Ji inUSUB 9 

76 5=5+70008 

39 時 料 -1:TF N2MRE 
fURN 

間 PRINT EPRINT 『【 
ロ a 箇 PUyer1"」 [5 
0 

45 FRK5iPRINT 「! 
Hi SCOrel1"iR=S 
iiNPUT NaWe 「」 
中 ' 


・ ちよ っ と ね 。 P1 の 15 行 K=K 
・ +5 の に 続け て 25・ V、 
・ 60 行 F*25 の に 続け て 3 の 
の ⑦ * V を 追加 し よう 。60 行 は ス 
ペー ス を 詰め れ ば 入る よ 。 
(だ けち や ゃ ん) 


39 INPHT "FTry H9a 
1n1 "4 F / す -" 
PfHFEN 境 

58 上 好 

9 FR = TH 99iN 
EAT ZIREIURHN 


- 18 FOR ZETT 


EP - 放 前 隆 ENT 
55 うす 和 55 ニ 5+2 介 

井上 ET g 

内 本 ami 日 ピリ 4 
T=『-2TF TK23T= 
け 

38 iTF 叶 お RODSUB #4 

4M EiF に 505UB 的 
: に 昌 

59 Y=YT。9SITF "15 


9 すず 


3 5 
5H4 PRINT :PEINT " 
LLERR IPIRETU 
RN 


9 


3 PRINT 
1W FOR =1 HIFR 
NT ESR 記 "5 : 
: USUB 38:PRINT 


LGR と ) ーー ラ 5 ュ * ロ 


JSUB 3W 


79 時 XT Z:5=S+5009 
iPRENT ESR 3 "5 
"5 :5USUB 9 

94 PRINE [SR 本"[" 
iLESR 1 "3175sFH 

a= 間 TH Wi 用 
1 gsPRINT : 太 HU 


還 変 数 リス ト 


|$.J$,K$ ea 画面 デー タ 
T-…… 煙 幕 の 表 示 時 間 


N 8 の est 自 車 の 数 

〇 …… 煙 幕 の 残 り 時 間 
U…… へ ひび 判定 用 

Y…… 対 抗 車 スピ ー ド 
R…… ハ イス コア 
VS$…… ハ イス コア 保持 者 
ALB-…… 自 車 の 位置 


or の の 人 2 商 
L,M…… 画 面 表 示 用 


P4 
9 PRIHT ESR 5 
iLoR 1 1 iLSR 
(LLSR 5j 
HLSR 1 す iih 
HSUB 


・ H$…… 自 車 の キャ ラク タ 
・ W…… 煙 幕 を 出し だ 回 数 


・ 還 プ ログ ラム の 説明 
・ PO の 
10 一 26 初期 設定 と タイ ト : 
・ P3 へ び の サブ ルー チン 
・ P4 ガ ぶ き お じ さ ん の サブ ル : 


ル 
29~160 メイ ン ル ー チ ン 
29 一 36 画面 表示 


37 面 フリ ア 判 断 

38 エネ ルギー 表示 : 
設定 

39 煙 器 表示 

40 一 50 接 豆 判定 

55- 90 キー スキ ャ ン 

100~-135 対抗 車 和 動 


FR =2 『H EPR 
NT LESR 3 4 5: 
gUSUB 35: 上 ET と 
FUR と = は 5 PR 
INT ESR gd) Hi 
g0SUB 95iHF 5 
jPRINT LSR ji 


140 エネ ルギー 切れ : 
: いい カ な お 。 


判断 
150 煙幕 の 残り 時 間 


・ P1 自 車 爆発 サブルーチン と : 
・ ・ スタ ー ト 時 点 で 、 じ つと し て い 
・ て も も ら え ちゃ う の で これ は ま 
の し 。. だ 人 1 の 2 行 選 TFP A 


2 に 
己 ら : 面 ク リア サフ ルー チン 


レン 


・ 較 チ ェ ッ クボ ポイント 


PB の 液 馬 はち つちや ゃ いけ れ 


49 NEXT ZiPRINT CS 
Ri 41600895:50 
SUB 9 

BPRIHT CSR 15" 
FT50SUB 98:5=91 
19808:RETURN 

99 FOR #=8 TO 208 
NEMT 

95 RETURN 


走行 時 間 も 考 慮 に 入れ だ ほう が 


あこ と 、 巨大 スペ シャ ルフ ラッツ 
グ で 20000 点 も ら え る が 、 ゲ ー ム 


=5 の : 1TF H$= ニ 1? 


: THEN3 の と し よう 。 敵 の 追 
・ い 上 げ ス ピー ド は 、P0 の 15 行 
: Y ニ .Z で 設定 し て いる 。Y ニ .8 
・ ど 、 上 下 左右 に ス フ ロ ー ル させ : 
・ て 、 な か な が 移動 する 感じ が よ ・ 
・ ぐ 出 て いる ね 。 残り ステ ッ プ は 、・ 
: 130 程 度 あ る ひら 、 ちよ つと し : 
・ だ 改造 は で きる ね 。 得点 要素 に ・ 


ぐらい に する と 、 ガ な り ム ハズ 
いよ 。 (だ けち や ゃ ん ) 


「 さ キン る の は さこ てき は 」 こ るび 


は に くさ と と きき や ざ 」 NVY 2 ( 壮 半 
づ 』 。 き の きき ャ 半 っ 補 さ (ーー を 」 一 ( 字 革 ) 


あ 

つ 

ち 

や の 

ん れ ば 

oe 内 

の 

| ラマ 

ん / と 
グ 

ー 弄 


28 PRINT "Tennis 5 
367i snOSBB 1: 
PEINI "Hi1 Scors 
Hssn0SUB 41 

ZS PRIHT CSR 5 "Le 
Ye17 (1-4) "iiB$ 
EYIIF HB 人 *1『 
fHFEN 25 

Z6 IF B$〉"4" f 有 HN 
メ J 

38 = 用 (B$)+2:K=1 
4 科 *「+1 障 朝 

得 PRENT PRINT は 
肝 14" th 3dWe" 
isnUSL 有 HH ます: 上 = 
F= 間 

3 きま =J†1E TEF =25 ま = 
iPRINF "て Rec 
eivye > jsRUS 地 
#: 国 TB 68 

JJ PREINT "(Servi 
ce RS 


58 FRINI CSR 685" 


Freddy 7 isB$ 
ETIIF BP『 
FN 68 


介 し =11:D- 夫 星人 : 
SUB #2:50SUB #1 
ip50SUB 

98 HF に 1 『HFEN 13W 

9 [=INT (R 提 校 せ 1 
HH コ け に) に 
-2: 符 寺 1D(2*1-1 
>Z)5US0B 計 

10 科 B$KEY:IF B$ 補 1 
0D( 1,1 KK-16 
*( ゴ 和 -2)+5* 則 50 
TU 2 

118 IF [>8iIF RH 介 時 
和 村 て 3 壮 /405 DD+ 
iTF D>40 に 4 

128 IF [<z9jIF R 昌 
バ jjDD-EIF 区 
Hi D- 夫 

138 国 S0 7: 時 -1:X 
キー バイ 0+1 時 - 拉 
ID(INHT (R 間 本 せ 
1)*7,2):US ま 
H 


1 香 EF 上 上 -DH1- 肝 5*[ 
《R 且 内 135K=K+18 
*(18- す 士 )-5 欄 6 
HTH 2?58 

158 BKEYiTF B を "1 
し キキ - ま EEF (55 
[=p 

168 IF HB 生 35E=F+1 
放 F 2115E=11 

15D 上 BE 圭 -? 
放 F 6E お 

166 EF BT6TE キ + ナ 
計 F E211jE=11 

8 国 SUB 2: 
HUTO 挫 

Z08 PREINT CSR 5j"! 

Hs BUSUB 
#iPRENT * 
155”j :505UB #】 

218「 寺 115:TF F=45j 
F=4 秩 5 F 上 =4 昌 3 上 = 
BiE= 

224 【F =55 『 有 EN 59 
| 

/3# ROTU 298 


258 PRINE ESR 9j 了 5 
PiEOS 導 ま 
iPRIHT * He 

PS 

Z68 上 FTi5iTF E=45: 
E=4 拉 5:TF F=4 介 5E= 
3BsF= 媒 

ZiW IF E=5 【HEN 35 
M 

Z00 PREINHT [SR Fi" 

EGOSUB 
:5OTO 58 

30 喝 PRENT " nst 3 
ad 中 Gi BUSUB #1: 
時 HEK 求 -5 

318 【F 虫 33EF 財 填 52 
jPREIHT " LHST 
SEI "ip0SUB 8 
iGHTH 3 

32H OUTO 38W 

394 PRINTI " 3ae 
WTOUSUB EL 
し 5K ボ +4 

369 IF LSEF 上 - 際 2 
PREINHT [SR "5 
et Ps 国 S 肛 ま 
1:5UTU 9 失 


間 き of@ 


1 One ン ら 


ペー くつ 」 ひび 


"ュー ズン 


の 
ト 2 


ペー や くつ る 
づら vw (we 詩 ) 


s、 < mr 
> ドド 、 と ケー ざさ ぶ C 沼 


0 の YA の くみ 


クツ 2 


<h 


デ 


の 


w 
プ o 


「\ の へ エン 1 や NN 


ぶせ 


3 但 【F 昌 9j 了 INT 
SE[" ii0S 
HB #1:K ニ K-209:b 
HTD 4 

3908 PRINT "3ame 「: 
Li sBU0SMB 
#1:BOTH 特 

99 PRIHT "0 財 
N Pi 国 S0B 幸 : 
UTU 5 抽 

49 PRINT "HH 誰 的 
ER PiigUSUB 圭 

コ 提 IF Ki 遇 KiPRIN 
1 『 用 蝶 0ME 
"RUSUB ま 1 


画 変 数 リス ト 

$…… ボ ー ル キャ ヤラ と コー ス 対 
応 キ ー 

に 」 aeOera サー ブ プ 権 

し …… 自 分 の 勝ち ゲー ム 数 

M…… 相 手 の 勝 ち ゲ ー ム 数 

A…… ハ イス コア 

吊 Rs キー 入力 

征 5 人 8 レベ ル 

K…… ト ー タ ルス コア 

E…… 自 分 の ゲー ムスコ ア 

F…… 相 手 の ゲ ー ム スコ ア 

〇 …… 自 分 の 位置 

D…… 相 手 の 位置 


(あこ 
PUSE 
10 


:CURSOR 6: 
ー= ニ = RDDITI 


2:MNR1T 16B: 


RESTOURE 1 りり のり: 
FOUR J=1TO 134: 
RERD RE:BEEP 1, 
R, 49:CURSOR 24 
:PRINT "ENEXT 
J3CLERR 

19: R$=" り 5965C じ 328 
38325C": B$=" り C 
1 49CZR253R481F 
"し $=" り 9149D ノ E 
Z92E491E" 

11:D$="3 り 68/4 ノ CZ8 
ノ 839":E$=" り PC1C 
り 9CSB255B481F" 

トン に あの よし ZD/E23 
ノ E481F":G ロ $="g5 
り 96386 り 69483 り ": 
H$=" り 3 り PF 4 45F 25 
り B44 り 8" 


318 PRIHT 
igUTO 18 


P1 


18 FOR に 9 TH 158: 
NEATI ZsPRINT ER 


ETURM 


せ う 
EE つ 


if PRIHT EPRIHT CS 


主計 


K ) JH 


TLSR eg ep 


ETUWN 


FR 
EP 員 


No ゲー デ ー ム こ と の 肝 数 
"rs ボー ル の コー スズ 
W…… ボ ー ル の 亡 向 

X…… ボ ー ル の 飛び 始め 位置 
Y…… ポ ボー ル の 飛び 終り 位置 


詳 プ ログ ラム の 説明 
PO の 
10-20.30 初期 設定 とこ ダイ 
トル 
25c> 260 レベ ル 入 力 
40 2 た 254 テ に 
60 5560 サー ノブ 


13: 1$=" フ 2 フ F り 82B3F/B 
:J ま =" 1E43 


4819" 
3 コロ の ED2 す 1 し“ 


14:K$=" り 292324848 
: 上 上 ま =" り ノ 
425E3RSE 428 ノ 2「: 
1$=" フ 89435BG358 


920 つ っ ト 


6n ノ ZZ" 


15:N$="2844532B っ 3 
0$="3 り 48 
5C445C444839": 
P$=" り 3 り 5 り gn1 458 


4428": 


2 り 59" 
10: Q$=“" 
ノ B り PF り 5 "5 


625Rg2『" 


12 ょ U り ゆ = ニ リラ FEZF3F3E 3E 
1E"?U ま =" ノブ F1212 


トメ ルス 1 ク 2" 


PCCOPET 5K 


ZR TO T 5 


PV に 
="1E 
2238 
S$=" り 25R6 フ 2353 


28 PRINT CSR 5 に 


PCSR "ITPCSR 
CS 5 
FCSR SICSR 
mi 
PRINT CSR 2 時 
iNET ZiRETURN 


FOR >% TO Y SI 
EP 

PRINT CSR 53"" 
FCSR "IESR 
TCSR 5 1 
PCSR 2!H95 


70 画面 設定 
90 相 サ ー プ ブ 設定 
100 打ち 返 え し 
110-120 相手 の 秘 動 
130 自分 サー プ 設 定 
140 相手 の 返球 
150-166 自分 の 秘 動 
170 画面 表示 と 打数 カ 
2 
200<230 mlSS 
250-270 ACG 
280 スコ ア 表 示 
300<370 ゲー ム セ ッ ツ ト 
380 ゲー ム 数 表示 


2 ロ : 
ic4BMI 


2 プ : 


24: 


: パ ま =" 1 し 9C9 り 9 りり し 


1D"skl$=『121212 
ド め 1 グラ =") 
3EF3E3F2 フ F フ F": Z$ 
="12121212122F 
REH _ PHRIN 
"DRTR LO 
HPCYes=1) 5 
IF 2Z=11INPUT HG 
( 求 )。 TH, LB: U=9, 
罰 = り 9, Z=9:GOTO 2 
4 

B= 1 gg, じ =69, E=1 
B, TH=1 り 9, =1) L 
B= 1 

り DSGES RET 
: RESTORE 8g+ 
Y+LB*19:FOR U= 
1TO X+1:RERD 0 
: NEXT U: 
RESTORE 9PBP: 
FUR U=gTO MM: 
RERD L,H, N: 
NEXT U:GOTO 35 


39 EAT ZiRETUR 


PS 
i# FOR 
EP 目 
HPRINT LESR 5 
5LSR 9) 1 iLSR 
HTMEAT EERE 
TURR 


eX TOY ST 


Pp 
18『HR 
EP 邊 
HPRINE ESR 5 
iLSR ggH も 55 時 [ 

ciREIURR 


ea HHT5 


es510 ダー クオ ー バ ルー 


居 ルー プ 

に 妥 画面 表示 サブ 

P3-PG _ 台 レベ ル の ボー ル 
を 飛ば す サ ブ 


圏 チ ェ ッ クボ ポイ ント 

相手 と の ラリ ー が 続く と 、 軸 
わざ ず 熱 ご な つ ち ゃ うこ の ゾー ム 。 
打ち 返す キー は 、1.、 ど 、 コ キー 
だ け ご 、 ぢ ちよ つと や り に くし ぃ 
P0- 10 行 の S の 内 の 1 の 3 を Z 
AO に 変え よう 。 こう する と 、 
両 ま で プレ イ で きる 。 

(だ けち や ゃ ん ) 


25: 上 =1-(URND L う /L 
: 時 モ 1-(URND 1 う ン 
1:iN=1-(URNUD N) 
ZN: GPRINT @ ま (2 
1+L )j 加 $ ま (23+F1) 
Q ま (2Z コ +N): GUSUB 


32 

26: CURSOR 5: 
GPRINT 0$j: 
PRJNT 3 
GPRINT L$j: 
PRINT Bi" (中 X 
YUDTeiE 日 く < コ 9 


UKR C く gGOUTO 598 

2 クノ : 1F X+Y く > り gND 
RND 19 り =5GOUSUB 
1 りり 

28: り =U+.2: 1F (U- 
INT U ぅ )=.8BLET B 
= ミ Bー-(1 1 ) ノ っ 

2 ヨ : CURSOR 24: 
1NPUT Zi:BEEP 1 
ぅ > 1:UN Z-3 は BUTO 
2 りり , 3 りり 9, 4 りり 9, 46 
り , 4 っ 9 - 


うり : 


3 


う 3: 


34: 
35* 


36: 


づ ノ : 


38: 


4 り : 


41: 


42: 


43: 


44: 
19: 


191: 


192: 


35 


1 り 4: 


内 内 + せ (/ ニ 1 )-(/= コ 3 
2): 還 三 軸 二 ( 軸 ミ モー 1 ) ネ 4 
ー(>3) ネ 4 

IF Z=2 フ LE 「 メニ X+ 
(人 且 3) テニ 1 うう * 
Ii ヤミ Y+( て (= りう)-( 
内 =2)) う * ネ [1 

1F X=1PRNDU Y= ノ 
GUTOU 4 

GUTOU 24 

IF LB>=3RND K= 
BCURSOUR ロ : 
PRINT CHR$ (12 
ノ 2jCHR$ (12 ノ )} 
CHR$ (12 ノ ): 
CHR$ (12 ノ ): 
GOUTU 26 

GUTOU 25 

IF X=daANDU ヤ Y= ノ 
ND 内 =3GCURSOR 
2 だ 民 dMT の 284 
ノ 89 り りり 1E" 

RE TURN 

CLS 5:1F と 1 
INPUT "MMhat fl 
OQK ア て よー 中 うと) 
IF Z>gRND Z<5 
LET LB=Z: = ロー-2 
:B=B- 1 り -RND 5: 
GUTOU 42 
LB=LB+ ] : =R+ 1 : 
B=B+25: ]F E く < くり 
LET B=B+E 

IF F く <gLET B=B+ 
F* ネ 1 .5: = ロ +F ン 4 
じ LS :CURSHR ヨ : 
販 邊 SE し LB そ 「 だ "3X 
= り 9:Y= り : 1F LB>4 
CURSOR 8:PRUSE 
"Dnagon Foom!" 
: GUTOU 6PP 

GUTO 33 

CLS :CURSOR 6: 
PRINT "Fight! 
Vs":RESTURE 85 
り gi:FOR U=1TO LB 
RE 月 旨 上 上 。 TNI: 
NEXT U:S=a(11+ 
RND 3):RESTORE 
86 り +S:RERD L, 
> N 

U り =(RND LB) ン 1 ロロ + 
すま 1 灯り 2 全車 : 
N=N*UkCURSOR 1 
りう : GPRINT a$(1P 
きま に この 255 
TU 1STEP -8: 
BE に ビー 1) 3 
NEXT U 

と = りり: INPUT "Fig 
ht(ENTER):Esco 
EK)" ょ Z 

IF H=1RND Z= り 
INPUT "How man 
り POWeh? リ 50 B= 
ロー ロリ : 上 し ニ Lー ロ * ネ (1 、3 
+ ロ ン 1g): BEEP 1, 
1$ BEEP 」。 3 


FOR U=1TO 3: 
CLS :CURSOR 5: 
PRINT B:CURSOR 
1 1: BPRINT J$: 
CURSOR 13: 
GBPRINT g$(1Pg-S 
) : CURSOR 15: 
PRUSE Li1F G く 1 
LET G=1 


195: 
196: 
18 フ : 


1 り 98: 


1 ヨ : 


11 り : 
1 2 り : 


121: 


13 り : 


15 


132: 


9 


134: 


135: 


29P: 


Z り 1: 
3 りり : 


うり 1 


う 32: 


B=INT (B-NZG): 
三 司 、 ノ / ギ く て 1ー リ ): 
IF 〆Z>gGOTO 12 り 9 
L=]NT (L-F ノ N): 
L ミ L- ロ ノ 2:BEEP 2 
] 
3 
CURSOUR 5:PRINT 
BI:CURSOR 15: 
PRINT L:NEXT U 
IF B<= り GOUTO 5 
り 
1F 上 く =PgPRINT " 
MIN! "EiBEEP 3:zRa 
= ロロ +S ノ 5 : 和 1 日 =T 昌 + 
1NT (=-5》:G5GT 
1 3 
GOUTU 1P ロ 2 
と =RND (2 り g+S+LB 
うー 有明 ノブ 5 1F < く +( 
RND 3〉*[1PnUSE 
"5oddamn " : 
GOUTOU 24 
PRUSE "No. Tru 
am9ain! "sf 
1 り 3 
]F LB=1ND S=3 
HND K=gPRUSE “" 
You 9et the 昌 . 
LOW 8IK テ 1 
IF LB=2RND S=5 
RND 1=gPRUSE " 
You 9et H.boot 
$:。 も よ 三 15GBT9 1] 
34 
IF LB=2RND 5S=5 
RNDU 」=11IF H=g 
PUSE "You get 
1. swuOFd.":H=1 
ュ 上 =15 り 
IF LB=3RND S= ノ 
RND J=gPRUSE 『" 
You get FI.shie 
1d. "ゴミ 1 ロロ = 1 りり 
IF RND 2=2LET 
U=RND 8B+LB*4: 
PRUSE "You 9et 
生れ 人 まま まで 作用 。 
"3 じ = ニ じ +U 
FOUR U=1TOU 8P: 
NEXT U:GOUTO 24 
IF D>gBEEP 1iD 
= - 1 : ロニ B+ フ 2 フ 3+ 
RND 8:1IF B>TH 
LET B=TH 
GUTO 24 
CLS iMRIT 59: 
PUSE "PHagic 
ま 介 科 まき 更 得 民 湯 1 
TU 451F 回 ( ブ ォ LU) 
=1GPRINT 回 $ ま (15 
キキ 有り J234PRINT “ 『 


リ 
:NEXT UECLS 


GPRINT K$j: 
PRINT Ri Pi: 
PRINT L ま j: 
情 層 NT 月 3 2 すま 【 目 
jj PRKINT (DX 
0 

FOUR U=1TO 4: 
GPR1INT まま (12+U 
2j:PRKINT @(2+U 
2 SNEXL U5 
GPRINT KR ま $j: 
PRINT GiGOTO 2 
4 


4 ロロ : 


491: 


49 り 2: 


4 り 3: 


494: 


4 っ: 


4 り 6: 


4 り ノ : 


4 り 98: 


4: 
41 り : 
411: 


412: 
45 り : 


と 


469: 


461: 


っ りり : 


うり 1 : 


512 ア 4 


ELS 3 は 1F XY く ) 
GUTO 41P 
GPRINT 0$):U= 
RND 3:PRINT Ui: 
生還 E 有 TS STNPUT 
/』 ビニ ビ ピーU*/: 上 ミ テ E 上 + 
〆 

CLS :GPRINT N ま $ 
):U=RND 3+4: 
PRKINT Uij "GOLD" 
91NPUT すじ = ピー 
U* ネ 〆: =D+〆 

CLS :GPRINT P$* 
3 FUR し 11 有 0 835 
回 民 よ NN) 3 5“ 
3U* ネ 8)" ロ P3ENEXT 
Ui: CURSOUR 24: 
LNEPUI どり し ニー〆 
8 :F=Z*\3P 

CLS :GPRINT KR$ ま 
33FUR 有 U=1TU 3: 
選民 は NL UK2S) 5 
まり 守 3「 昌 "5NEXT 
U:CURSOR 24: 
NEPLUT- 〆 ど : じ ニ ヒー ニブ * 


: =Z*25 
CLS :GPRINT 0O0$ 
jiPRINT "1GOL 


団 旬 KPW2 NNPEUT 
* じ = ビ +〆? 上 = ビー 

CLS :GPRINT N$ 
に R ま M 導 で BUL 
回 Ks1JNPUTI と 
2 た 三 じ ゃ まつ の * 昌三 ロー/ 
CLS : ロ PRINT P ま * 
):U り =INT (F ン 3 ぼり ネ * 


32cFPRHNT 05 "68. 


に 科 (KW INPUT 
/: H 王 上: じ = じ +U:F= 
り 

CLS : ロ PRINT R$ 
3 =1NT ( 昌 ノ 25 ネ 
ノブ 2IPRINT Ui "GO 
LD Ok"j: INPUT 
の : J= ニ 9 : じ = ニ じ +U: ロ = 
] 

=g: GOUTO 24 

IF 上 <= り GOUTOU 24 
じ LS :E=E-1: B=B 
生ま だ 呈 み LE【 
B=TH 

GUTO 24 

ELS ETNPUT "TB 
に だ SE は す 。 Ge@ 圧 まげ 
と 1 ド ジー トド PRHNI 
りら QUE STQART": 
PR TINT 本 避 ( 衣 ),T 日 
ぅ >LB 

PRUSE "SQUE EN 
D"IGOTO 24 

IF >gBEEP 1, 3 
り : 月 = ロー- 1 : B=B+5P 
*: よ FE HBEET 7 
=B 

GUTOU 24 

FUR U=255T 1 
9 ば 所 に デ よ 人 人 EEP 
1,U, 15:NEXT U: 
し し 5S 3 し じ URSHR 御 : 
MRIT 29g:PRINT 
月 有用 上 如 ひ U 
 : 根 

すま NEPUT “1 agua 
inPCYesS= ニ 1 うう j) 2 
IF 〆Z=1GOTO 1 
END 


le】212E 


6 り 1: 


5 り 2: 


593: 


5 り 4: 


e】2p 


596: 


le】2 ア た 


9 り 6: 


6 り 3: 
5619: 


511: 


51〆 ミ 
515: 


5b16: 
51 ノ : 


MRIT 8g: IF H+1 
+J+K く 4 ロ NDU < く 25 
PRINT "You are 
unquaulified.“" 
:FUR U=1TO 2:Eg 
CRND 4+2)=g:LB 
=3: GUTOU 24 
MRIT gi:CLS : 
DIIH DU$(2): 有 $(g 
)=J ま $: 日 $ ま (1)=" 4 
3E39/264B3E ビ 1C"5 
D ま (2)=" 1C24 1D フ 
E づ 33E41E" 
D ま (3)="1C3C482 
6333E49":D$(5) 
=" ノ フ E3848gCgFPF 
9R り 2" iD$ ま (6)=" ロ 
29QPgF FC48382 
F" 
本 て フク)="3d3F 3 コ ヨ ク 
E385811PBE "iD$( 
4) う =" り gE 115838ZE 
33 ビ 3 引 " ミニ) のり の: / 
ニー ] : Y= り : ロ = 
U=RND 4:GOSUB 
SA IE 2600 
le12 に | 
よ E 1 忌 き 
RND 2-1:CURSOR 
18*R: GPRINT _D$ 
(4+2*※ 民 ) j 有 U ま (5+2 
*※ 民 ): CURSOUR 18* 
(CR=g):PRINT 『" 
": GUTOU 6P り 8 
IF R 民 = り pFOUR 1」=3 
TU X-1:CURSOUR 
IiGPRINT "1g18 
1C1nBC":NEXT 1 
:」F 昌 =1G5OTO 2 
り 
IF R=1FOUR U=12 


まま STEER っ 1: 
CURSUR U: 
GPRINT "BC1R1C 


1819"iNEXT U: 
IF =-1GOTU 29 
り 

CURSOR 3:PRINT 


スニ ペー ト 数 フ 2: 」F 
X く 30R X>18LET 
ペ ニ ペ + ォ F ネ 2 
GUSUB 615 
1F X=3QNDU / ま =" 
っ "NDU R= り 
CURSOR 3: 
GPRINT "8P848 
うちわ う 3/E り 3" ? BEEP 
3 を aITLU 2BB 
IF X=12RNDU 〆Z ま = 
" つ "HND R=1 
CURSOUR 12: 
GPRINT "gg932E33 
ノ フ 6439898": BEEP 
3: iT ノ フ BP 
GUTOU 694 
と ま =1NKEY ま $ :F ニ ( 
Z 事 ニ "コト )ー( と まま "1 
け ) う 5 XX ニ X+ ィ F : 
じ URSUR ー ド : 
に REMN【I で 
IF F く >gLET 日 =F 
CURSOUR X: 
PRINT DU ま (2- ロ ) 
:RETURN 
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> いて 著 きん 人 We 層 て 吉 | 甘 


と つう 
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PS 
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: CURSOR XX: 
BPRINT "19643C 
ノ ジ 5F ヨ BZ ビ 641 り ": 
GOTO S5989 
:CLS :CURSOR 9: 
PRINT 


GPRINT D$(4)jD 


$(5): CURSOR 2Z1 
: GPRINT D$(6)} 
D$(2〉)j:PRINT " 
:RESTORE 959: 
FUR 1=1TO 6G: 
RERU Z$: は $(1)= 
Z$:NEXT 1:FOR 
1=1TO 2: 
RESTOURE 1 りり : 
CURSOR 5:PRINT 
(1 ネフ ー1): 
GOSUB 256 
:CURSOR 5:PRINT 
g@$( 1*2): GOSUB 
Z56:NEXT 1: 
RESTOURE 1 りり 1: 
CURSOR 5:PRINT 
E$: GUSUB 256: 
GUSUB 256: 
RESTURE 1 り 9P: 
CURSOR 5:PRINT 
F$: GUSUB 256 
: GUSUB 256 
も た SS さじ URUK 95 
MRIT 33:PR1INT 
"Conghatulotio 
ns ! ": TO 591 
2 ド 旨 民 ゴミ 110. グ : 
RERD RiBEEP 1, 
QR, 18g:NEXT Ji: 
RETURN . 
iDRTR 14, 14, ノ フ , う 
) 4。 ee つ 5 CA5 1 2 


一変 数 リス ト 

ci EE ビー タダ 用 8 に め に 
ポ ボイン ト (HF) 

Ao 意 の プラ フィック / ダ 
ーー ジ 

B$ お …… 魔 戦士 の プラ フィ ッ ク 
0 

C$…… 重 騎士 の グラ フィ ッ ツ 
2 ング 

D お "スラ イム の ノラ フィ イッ 
2 パタ ー ン 

EE お …… 情 戦士 の グラ フィ ッ リン 
ター シン 

F お や 誠二 の グラ の ィ イッ ク パパ 
0 

G お "の … ベ の の ゾラ フィ リッ ク バ 
90 ん 

HS…… 農 民 の プラ フィ ッ ク バ パ 
ツェ 

8668 バー バリ アン の の ラリ 
2 


中 oo 目 衝 の プラ フィ ッ ン シン パ 


の ク 


KS……H・P シ ン ボ ポル の ブラフ 


ONM テッ 


し $…… 体 カシ ン ボ ル の グラフ 


が ンク / 9 9 テッ 


MS…:… 金 シン ボル の ブラ フィ 


02 ダー ニク 


NB…… 薬 シン ボル の ブラ フィ 


0 2 タモン 


DRTR 19, 2, 5, 12 
6. コ 。 お > 8。 
iDRTR 19, 11, 14, 
1 り , 2, 8, 6, っ , っ , 1 
: DRTR 2, つ ぅ 1 は 。 コ 
語ら の 。 4 , ] 3 19 
iDRTR 19, ブ , 12, 2 
ぅ 4 8, 2 8, ノ , 8 
iDRTQ 2 4, 1 1 1 
> , 8, 2, 12, 1g 
:DRTR 2, 8, 14, 6 
4, 9, 8, 2, 8, 1g 
iDRTR 3, ヨ , 3, 1, 1 
※ 3 35。 コ 。 3, 16 
iDRTR 6 5 5, 4,」 4 
>) 和 4 1 2, 6, つ 1 
DRTa 2 4 1 2, の 
中 4 づ ぅ り , コ , ノ , 8 
iDRTR の ] 8, 1 
D, 1 ジ , う 。 1 二 ン が 5, 
DRTR 1 り , 6, ] ] 
1 。 1 0 , loF 隊 
:DRTR 19, 19, 6, 4 
> 和 4,。 4, 12, 19, 6, 8 
DRTR の の 8, グ り , り 
ぅ 8, 1 り , う づ , 8 
:DnTR 2, 9, 9, 9, 3 
> の , 1 2, 1 
は 回 仙 人 身 3 コ , づ 1 1 
) 1) ゴ ) 3, 1 1, 16 
:DRTR 6B, 5, 12, 6, 
す 4, 1 プ 。 D, つ 1 2 9 
:DRTR 19, 6, 9, り , 
り , 8, 19 り , 1 4, 1 1, 1 
り 
:DRTHR 1Pg, 2, 8, 3, 
1 当 。 の ] 4 ヨ 
: DRHTH の 5 , り , つ 4 
ぅ つ , りり, 12, 1 り , 1 4 


O$…… 廊 物 シン ボル の ブラ フ 


人 

P$…… 記 の プラ フィ ッ ク バ マタ 
テグ 

O$…… ブ ー ツ の グラ フィ ッ フ 
た Na 

RS…… 盾 の プラ フィ ッ ク バ タマ 
ジン 

SD ラン シ ノ の 0 の ララ フィ リッ クウ 
人 ン 

りお …… 左 璧 あり の プラ フイ ッ 
NGー ン 

V$…… を 璧 な し の グラ フィ ツ ッ 
002 

W$…… 前 璧 あり の グラ フィ ッ 
22 ツー 

X お …… 前 璧 な し の プラ フィ ツ ッ 
た 0 の = グ 

Yub… 右 壁 あ り の ツラ ノイ ィ ッ 
27/ ツーン 


Z$…… 右 壁 な し の ブラ フィ ッ 
ク パ ター ン 、 リ アル タ 
イム 時 の 入力 用 


834:DRTR 2, 8, 19, 6, 
? 8, D, 8 1 ぼり, 人 症 1 り 
835: DRTR 2, 9, 3, 8, 9 
) り , 9, 2, 5, 8 
DRTR 15, 6, 4, 1, 
ee り , 4 8, 1 4, 1 り 
DRTR 11, 3, 9, 2, 
1 も, 6 
DRTR も 。 4 4 4, 4 
り 4, 4 4 4, 1 2 
DRTR 2, 9, 9, 8, 2 
ぅ けり , 9, り , り , 8 
DnTR 2, 9, 9, 8, 2 
ぅ , り , り , 9, 8 
DTP 3 1, 1, 9, 2 
9 ] 則 。 1 。 1 且 ゴ 
DQTR 3, 4, 4, 4, 8 
* Sy 4, 4, 4 。 2 
DQnTR 2, 9, 9, 9, 8 
3 グ , り , , り , 8 
DRnTH グ 。 り , , , 8 
の り , り , り , 8 
DaTR 3, 1, 1, 1, 1 
) 上 。 ] , ] , 0 ] , 16 
NR コッ 2, 3..9, 8 
5 つ 5、D、 ブ ) /  B。 
DQTQ 4g, 4g, 4 
DQTQ 59, 6g, 5 
DQTQ 2 フロ, 5g, 8g 
DRTQR 89, 93, 1 gg 
DRTQ 99, 89, 13 ぼ 9 
上 SM.95. 1 


836: 
832: 
849: 
841: 
842: 
843: 
844: 
845: 
846: 
84 フ 2: 
859: 
861: 
862: 
863: 
864: 
865: 
866: 
86 フ : 4g9, 159, 2 
868: 3g9, 459, 3 
869: 5g9, 5g9, 5 


2, 1, 8 


G:…… 装 皿 度 
和 X Y NR XX、 V 座 標 
O 〇 …… 壁 の 様子 ( 信 体 ) 


力 e 
N-…… 壁 の 様子 ( 右 )、 相 手 の 装甲 : 
V-…… 歩 数 カウ ント 
S…… 相 手 の 種類 


日 …・ マツ マジック ソー ド フ ラグ 


F…… 和 殺傷 力 、 リ アル タイ ム 時 : 


の 秘 動 用 


2 …… エス ケイ ブ 判 定 用 


K…… マ ジッ フラ ンプ フラ グ 
| 0 マジ ッ ク プ ブー ツ フ ラグ ゲ グ 


Neo ツジ リク ショ ルド ララ ク 
PO 本 


DS$( )…… リ アル タイ ハム 表示 用 


R…… リ アル タイ ム 時 の ドラ ゴ : 


ン の 位置 
一 プロ グラ ム の 説明 
1 ンー 2*・ タイ トル 
10 て 18 キャ ラグ タ 設定 
20Pn 96 イル ルー チン 
3/… 38 ドア 表示 
40- 44 上 の 階 ヘ 上 が る 
100- 110 
120 121 
ョ 
130~ 135 


・ 1000-1001 
ファ イト ルー チン : 
正 多 の デーブ ルル ョ チ 


マジ ッ フ アイ テム : 


DRTR _ 4, 2, 1 
:DRTR _ 8, 4, 2 
iDRTR 1,8。4 

DRTHR " You 9get 

RDD.", "1t sovo 
s 引 正和 。 5 hs 

90me is end.“ 
iDRTR " PROGRRF 

衝 K 月 (PRE 
5E 料 1 より 、。。。 
ぅ > Prognam Poch 
ette" 

19 り 9:DRTR 1 り g5, 24, 

1 り っ , 1 95, 84, 5 
ノ , 65, 26, ノ 3, 6 
ノ , b ノ , > 8 り , ノ 
1 

DRTR 195, 53, 
つう 。 ら ヨ , コ 3、 つ 6, 
8 り , っ 56, 62Z, 4 り 
45, 4 8, 4 45, 


tgE ト ルー チン 
薬 を 飲む 
レポ ー ト ルー チン 
店 ルー チン 
良 料 を 食べ る 
SAVE ル ルー チン 
460-- 461 魔法 ルー チン 
50OS502 ダー オー パー 
600 ら 階 へ 行け る ガ 判 
断 

リア ルイ イム 初期 
設定 

リリ アル ダイ ム メ イ 
2 ジニ グ 
リア ル ダ タイ ムキ ー 
入力 と 自分 の 表示 
700 リリ アル タダ タイ ムダ ゲー 
の オー バー 

目標 達成 
Eee 
ント ッッ で 

に テー 
en 

相 デ ー タ 
3D デ ゲー ツタ 

メ ツ セー シダ デー タ 
この ーー 
の 


200 一 201 
300~ 302 
400- 409 
410 412 
450… 451 


601- 603 


604 612 


MIB017 


490cC./56 
810ー 81/ 
620^ 62/ 
830 63/ 
640 一 64/ 
6850 669 
900 一 903 
950 951 
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PDKE KswdwLwLsDsDy7Twr『 


wrw3s3*3* う *1* 1ssMs 昌 
*sMsFwJsHeUi HHN し 
UTU 15M* 32* ささ * 3 和 95 15 
* マ 1 * マ マッ 159 


TiPHKE KswHsUsLsL*DbsDs ij 
wfesrwis う *3s う 1s1ls1s1 
wisMelsePsiE _ HN じ 
hHTI 15 ロ Ms マロ * 3 コ 35 3 うら 
* ご 3* 3 19M 

1 コ GiIPHKE 上 は 1 3 オビ ア デマ ネロ +1 1 
12s113』 hbUTH 115 
15iPIHKE 生 F は 1 ゴキ て し くみ 1 】 で 

じ ー( じ ニラ うす ( じ モニ TJ js 113*1 
135 5UIU 118 
1 イ TEPHKE KFG1 3 オレ アデ キロ + キ 1 。 1 


13x115: nnTO 115 
くぅ 1)*(2 


UTU 115 
&F は 13+ じ デマ ネロ +1 。 1 
19119: 5UTH 115 


19: 


Zi PHIKE F は 1 イキ (し くう 1 は 来 ( 
じ ー( じ モミ) すし モイ ) Js 1T*1 


5HfTH 115 

&F ロ 1 3+ じ アデ ネロ +1 * 1 

1251122 HUEU 115 
(2 

PJ)s112 

hHTU 115 


ェ 「『 


じ ー『 ビ ニタ )+ す ビニ 
PE」 


ょ と ば 


マネ ャ キロ +1 1 


13*113』 5UTH 115 


還 変 数 リス ト 


W( )- 


Nb… 


… ク リス マス ツリ ー 用 
コー ス 表 示 用 アド レス 
… ハ イス コア ラー の 前 


F.G,LJ,L,M,O,P,O…… 画 面 


表示 用 デー ツタ 


T…… ト ン ネ ル の 長 さ 
R…… ト ン ネ ルク リア 回数 


・ ス ピー ドア ッ プ 時 の デー 
飛ば し 用 
残り の 車 の 数 


拉 和 8 5HTH 115 
33IPHKE 徹 FB1T キ (に て すみ 1 ) 玉 (デア 
ビー ビニ 3) す (モイ ッ 4*11951 
hlTn 11 コ 
35IPUKE 生 FB1T す (し て は 1 ) 玉 ( デ 
ビー ビニ 3 ュ キ オミ ビニ ia) 115。1 


241POKE SFB1TTCL く 21)NK そ 」 55iMRIT 19gI PEINT "TOP 
[ー( じ モッ オ 【 し モリ ッ 75 1191 1 IN ま SIY THIET PTSYI 
15* BUTU 119 MRIT 9I PRINT ""i 
25i PHIKE を に ロ 1 3 キマ エネ ロキ 1 s 1 [し LL 放 11EI じ = 生日 = 5 
15。119』 GUTH 113 ニッ 「 ニ 遇 ニッ ヤニ ロ * 還 ニ う 
251PUKE kT は 1T オ (し くう 1 いそ | 了 MIPUKE &FS14yHyUsD ッ 35 1 
に ー( し = う ッ キオ 【 じ = イリ) 7 ッ 119* 1 PUKE &F8B1E:112112 
7 BHTU 1 は 9 PHKE &FB2913>D0 
2TIPUKE SF81T+KLS21 7* て 2 yi PUKE &FS24LrBL 
に ー( じ = うれ 【 し =T 491291 | 5EFOR =g TO 21 POKE 
9 を BON JJO F825yma1 BEEP Ui 
381POKE &Fg13TEZ2w5+1* 1 CRLL &11Ei FUR B=1 
016 90IU 30 TO 15i NERT 8: NERT 
29iPHKE 計 FB1 イ キ ( し くう 1 ) ボ (2 器 
に ー( に モミ ッ 4 し ET 4 11941 | ggiPHKE &FB2EPy66 82 
134 BUIO 119 15> Hr66x66Hi BEEP 2 
3 PUHKE 上 は 1 3 キレ デマ キロ +1 s 1 Hs CRLL &11EI FDR 自 
19y115I GUTOU 115 =1 TU EBI HERT 昌 H 
31:PHKE 負 FB13+ じ 2*5+151 | askhnSuB 3 
OWNAKS 9UIS AS 199iTF >15 LET = jF 
325PHKE FB13+ じ アビ ャ ネロ +1 5 1 2 LET Y=1 
44391 bMD 11 191:TF E=1 NN INKEY5 =" 
333 PHIKE &FH1 イキ (し くみ 1 )( N" 5HTU 『 目 " 
ビー し = う ル オ 【 し = リフ 211991 | 193: =D+。943 RERD 2 IF 
人 0 2z=@ LET Z=4: IF V=g 
341PHKE ま FB13+ じ デ で キロ オ トッ 1 RESTHEE ( RND 13+199 
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THE HUNE-MHY STREET 1251TF TS GUTU 151 
1 ERPUFE し LUSEJD | sinnTn 1gg 
2CYES-1)173VI IF WC2 | 15miBEEP 4Ui MRIT Ti 
・ 上 EE “= PEINT "agCEUSH" 
9954MERI SUUND KUN | 151iM=m-11 iF M2 LET じ = 
1 US iF OK21 LET 4i MRIT Ii PEINT ""i 
に _ CHLL を 11E9I PUKE &FB 
53iE=BI 1NPUT JE 14xi PUKE SFB2C703 
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21 LET E=9 152iMRIT TE PREINT " 5 
s ユニ 
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RE UVEKR ) 
[ ザ ニ ロ . 


N 
? 
| 
章 
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判断 と 終了 判定 
道 の 表示 
デモ 判定 
117 キー 入力 
120 遠 貝 力 
150-151・162 フラ ッシュ と ゲ 
ー ム オー バー 判 
定 
ゲー ム オ ー バ ー 
トン ネル 
トン ネル 内 の 車 の 表 
示 
200 こ 213 コー ス デ ー マ 
圏 チ ェ ッ クボ ポイ ント 
3D タ イプ の レー シン グ ゲ ー 
・ ム だ ね 。 この コー ス は 、200 行 か 
・ ら の DATA 文 で で き て いる 。 
・1 ーー ノ ま で の 数 字 は 、4 が ガス ト 


KO⑤ あ "INKEEYb 
圏 プ ログ ラム の 説明 
1> / 人 道 の 表 示 
15- 3/ 車 の 表示 
50~ 65 初期 設定 、 コ ー ス ・ 
音 ・ デ モ 選 択 1 
70… 80 スタ ー ト ・ 
85・900-905 残り 台数 表示 
100“430 メイ ン ル ー チ ン 
100 レベ ル ア ッ プ 
101 プス ツブ プ 
103 コース デー テ タ 
読み こみ 
一 周 判定 
スピ ー ド アツ 
ブ 
106-107・125 トン ネル 発生 


110 
115 


ee oe eo の @ @ の ら @ ら @ @ @ @ @ 
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170 一 160 
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(3 HER 2355) UK 1 
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154iPHEE FITsblsGsUsUsD 
wisieEwbisisissbs は Bs 
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1 イ MiT=T-1』R=R+1: エ F じ = 
INT (LEZ)**2 DUTU 18 

17『5sPHKE 衣 FB1 イ +( じ く ラ 1 )(2 

ロー( し =3 う リキ (ビニ 了 ))wD* Ds 

UTU 1MM 

PHKE 入 F は 1 3+ オ し アビ ネロ +1 5 ロ 

shi BHTU 1MM 

HIJHTH すす 5 邊 *9s 昌 

< り 1 iiHIH コ 5bsbs5w コ 4* う 2 
ws 15 で * う 5 和 す * 昌 

sss 4 昌 


189i 


で 3EUHTH 392 ッ ジッ sw3*d55*5 
wby rwrs わ bs コロ w 和 ds 凡 
1 4* ロ 


Ta 5y55r4+ 昌 
MIlHTH 邊 すす 』 相 
MM 1 Ss5bsTwfwbsO5s 和 953 
Ys 1y 1 ss う * 生け 
H wbwrsrsbsbwOs 和 4 


111UHIH コ wPwbD5 TPwTsYP5T9D 
ws 生 * 

17IHHEH 392wZ51w1s2 ッ 3* 和 4 
waw5hwriwrsbsbs コ s 生 % け 

1 3 THTH 1HM 

99E EF 計 >1 FUR 日 =1 TU 居 ー 
11 PUHRE KFBEH+ コ Hs 5M 
1 で as39*12555Hi NEWT 


レー ト で 、1 3 が 左 カ ー ブ 、 
ら ン フ が 右 カ ー ブ 、 1 と フ が い 
ち ぱ ん カー ブ プ が きつ こく な っ て い 
衝 26 

自分 で コー ス を 作る に は 、 デ 
ー タ を 1 行 ず つ 原 々 に 作り 、 各 
行 の デー タ の 最後 に の を 入れ 、 
いち ば ん 最後 の 行 を DATA 
1 の の と する 。 そ し て 、103 行 の 
RND 13 を DA 十 入 の 符 数 
ー1 の 数 に 変え る 。 コー ス は 数 
字 が 続 こ よう に し て 、3.5, フ 
な ん て 飛ぶ こと の な いよ うに 。 
各 DATA 文 の 最初 は 3.4.5 
の いざ ずれ か の 数 字 に し て 、 最 後 
は 4. の と な る よう に ずる こと 。 コ 
ー ス 全体 が 1 つの 輪 に な る よう 
に 作れ ば OK だ よ 。( だ けち ゃ ん ) 
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みな さん 、 こ ん に ち は ⑦ これ で 2 回 目 の 登 場 だ 
ほる ee ゆみ は た る ん で いま し た 。 Vol.5 の ログ ラ 
ム オ シェ ッ ト に 載っ て いた 4 コマ マン ガ は 、 マ イコ 
ン ベ ー シ ッ ク マ ガ ジ ン 8 月 号 の “ 紀 カ ゲ ち ゃ ん 日 記 " 
の 盗作 で し た 。 読者 の みな さん か らい ろ い ろか な 方 法 


た が 、 こ れ も す べ て 担当 
の ゆみ が 勉強 不足 の た め 
だ っ た と 思い ます 。 原画 
re 
分 の 絵 が 盗作 され て 、 

ョ ッ ク の た め Vol. を 


で お し か り を 受け まし た 。 そ し て PC 一 こぞう に も っ て し まい 、 の の に 2 の ぐら PE も SC の 
お 手紙 で 問い 合わ せ て み ま し た が 、 そ の 返事 は 、「 姿 こと 。 秀 継 クン 、 ご めん な さい 。 
作 で す 。 そ っ ち て 調べ て 載せ な いか と お も い 、 出 し そし て 、 これから 投稿 する 人 、 オ リ ジ ナ ル て 勝負 


た る WO で で し た 。 ちと うと 残 あ が 72 ん て し し よう ね 。 


命 月 。 ち て ぎ 


| ゆみ ちゃ ん へ つの 質問 / す が ゆ みち ゃ ん は ? 


(東京 都 ・FM- 7 人 間 ) 
作 ゆ みち ゃ ん に 聞き ます が 、 め ゆみ ちゃ ん 
は ボー イス カウ ト じ ゃ な く て ガー ルス カウ 婦 ぐ ゆみ は ボー イス カウ ト の 女 了 リー ダー 
ト じ ゃ な いん で すか ? ぼく は 葛飾 6 団 で (地域 に よ つ て は 、 デ ンマ ザー と 呼ぶ と こ 
ろ も ある ) を や つ 
て いる の で 9 す 9。 カカ 
ブ 隊 の 組 付き リー 
ダー ね の で す 。 志 
う ク 年 ちよ つと や 
つて ます 。⑧ ゆ み 


が 所 属し て いる の は 、 東 京 世田谷 13 団 で す 。 
アラ レ ち ゃ ん み だ い な 女 リ ー ダ ー が ゆみ 
で す 。 見 け だ ら 声 を が け て ネ / 文 


みん な で 得 し よう ./ 

光 ポ シェ ッ ト の 値段 を 350 円 に し て ベー ジ 
数 を 増やし て くだ さい 。 20 円 は ん ば で 困る 
ん だ 。 そ し て 増刊 で な く 月 刊 誌 に し て くだ 
さい 。 そ うす れ ば 、 ゆ みさ ん の 給料 も 上 が 
り ま す よ 。( 1 画面 プロ グラ ム が や た ら 多 く 
感じ る し 、 ポ シェ ッ ト Vol. 1 は 280 円 だ っ た 
の に 2 か ら 330 円 に な っ た の は 、 ど うし て な 
ん だ ろ 一 ) (静岡 県 ・ 高 井 円 ) 

友 う 一 ん 。 そう 簡単 に 給料 ガ グ 上 が つ だ らい 
いん だ けど ネ / 20 円 あげ て 、350 円 に し 
だ ら 困 る 人 も いる ん じゃ な い ガ な や で き 
れ 民 10 四 で も 安 ぐ し だ いん だ けど で 太 


マン ガ 送 つて ね 女 


ジン 上 
琶 便 配 達 !? 


ゆみ さん は じ め ま し て MZ 武 仁 で げす 。 
と ころ で 当 、 稚 内 市 で あの 「 南 極 物語 」 の 
タロ と ジロ が か 年賀状 を 配達 する そ 一 で す 。 
バッ キャ ロー イ / 私 、 今 年 も 郵便 局 で 年 
貨 状 配達 し ます 。 つ まり 犬 と 同じ 仕事 を す 
AA02 で えー も ちっ くし よ お ク 
( わ ウ なつかしい) (北海 道 ・M Z 武 銭 ) 
文 北 油 道 で 郵便 配達 する の は だ い へ ん だ ろ 
うつ な あ 。 が ぜひ ガ が な いよ うに 、 あ つ だ か ガ こ ご 
し て が ん ば つて ね 。 キ ー の 押し すぎ で けん 
し レ よ う 炎 に な つ だ そう だ けど 、 遊 ぶ の も ほ 
ご ぼ ど に ネ / 文 


ひえ ぇ えー つ / ゆみ の 水着 次 初 公開 で 一 す 。 ま 
つ だ ぐ 、 塞 いと き に 、 こ ん な か が つこ させ な 
いで よ お 。 が ぜひ い だ ら 、 貢 任 と つて よ 、 
や ー ば ぐん 。 そ れ か が ら モ デル 料 も は ずん で 
ちよ ー ら い 婦 


2 


な めん な よ 。 


本物 か ら も 
投稿 が ちゃ っ た / 


フレイ バッ ク ・ チ ェ ッ フ ボ イン ト 


ョ W ホバー タン ク 採 知 器 


を つけ た ぞ / 
PB ファ ミリ ー 
『BATTLE FIELD, 


wVOL.5 の P86『BATTLE FIELD』 で 、 
P0 の 210 行 を [ニレ ー1 :TF し キ の :T 
ー ア ・GOTO 5 の に し て 、220 行 を 満 去 。 
P3 の 50 行 を GOTO4 の 70 行 を GOTO 
6 の に する 。 90 行 の : GOTO190 の と 100 
行 の ・RETURN は 不用 、 こ れ で 54 ス テッ 
プ 稼 げ る 。 そ こ で P0 に 
416 [FO<Pー3・ 
SR の :* 2 :CSRO : 
1 1 フ IFO>P+3 : 
OR 有 I( ( (CONN 
を 加え よう 。 ホ バー タン が 右 に いる ガ 左 
に いる か が 、 画 面 の わずか な 点滅 で わか る よ 
うに な り ま す 。 
(東京 都 ・ 伊藤 稚児 クン ・ 18 歳 ) 
條 伊藤 クン は 、 ご の 他 に も 、 ス テッ プ 数 の 稼 
き 方 を 教え て くれ た ん だ けど 、 時 間 待 ち ル ー 
ズ や P 7 の キー 入力 部 分 を サフ ルー チン 化す 
る と 、 ス テッ プ ズ も 乏 げ る し 、 フ ロク ラム も ス 
ッ キ リ す る ね 。 た だ し 、 ネ ステ ィ ン ク エラ ー 
に も 注意 レ しよう ね 。 (た けち ゃ ん ) 


作者 か ら 
プレ イ バ ッ ク 


MZ〆Z-2000/2200/80B 
「TOMKUN, 


0 < 


FRINI 


いま < 
: る 


名 プロ グラ ム ポ シェ エッ ト (VOL.5) の 『 TO 
M kun。 に つい て 、 改 良 点 が 見 つか り ま し た 
の で 、 お 知ら せ し ま す 。 

S0GB のり 0 (0148† す < 
> の 9 の) GOTO129 の 9: ON 一 (0=14 
フ ) 二 (Z2<> の ) GOTO1290 

を 追加 。 510 行 の ON Z1 GOTO 
550 : を ON 一 (ZZ1<>0 ・ に 、550 行 の 


_ ON _ Z2 GOTO 590 : を ON ( 
' Z2<>0) GOTO 599 


ます ね 。 


PRINT C 


ー それ ぞ える お て が み で ん な ぁ 。 


れ 変 更 。600 行 を 、 

ちの の / メ エモ ノ 1 寺 (1 く > の ) 
の 土 (2 こと の )  MUOIG !FBOY 
に 変更 し 、780 行 、/90 行 の Z 1 、 有 2 の 信 
を 適当 に 設定 する 。 

以上 の こと に より 、 剖 定 が 確実 に な の 、Z 


1 、Z ど に 値 に より 気絶 する 時 間 が 自由 に 設 


定 で きま す 。 (新潟 県 ・ 堀 沢 栄 クン ・15 歳 ) 
参 作 者 自身 が フレ イ バ ッ ク に 送っ て き て ぐれ 
まし た 。 ボー ル の 上 気 絶する 時 間 が 自由 に 設定 
で きる の で 、 あ る 程度 の 難易 度 の 調節 が で き 
(エイ キチ ) 


ファ ミリ ー コ ンピュータ ン ノ C 1 
! ア イス ノン フフ ニラ マモ レ 」 


当 VOL.5 の P80 の 「『 ア イス ノン クニ ラ マモ レ 』 
を 改良 、 エ ラー を で な ぐし て 、 バ パッ の 繧 を 
が ガ く ス ピー ド を 速 ぐ し て み ま し た 。 

5 KEY1, *POKE SHZ8007, 
の , の ⑦ *+CHRS (1 3) 

345 RUN 

の 2 行 を 加え て 次 の 行 を ひえ ます 。10 行 か 
ら H 1 = の を と る 。 330 行 を TF PEEK 
(&HZ89 の ) ・1 の の +PEEK (8H 
Z8091) <SC THEN POKE 8 
HZ89 の , SC ノン 1 の, SC MOD 
1 の の に ガ え る 。390 行 を 4 や = い ? : BS 
= ツ :-FOR != の TO 2 フ Z:A$ 
ーA$+CHRS (194) : B$+CHR 
お (195) : NEXT に ガ え る 。400 行 を 
CLS : LOCATE の ,.9:PRINT 
A$: :FOR = の TO 12:PR 
INT BS : : NEXT に カ え る 。410 行 
の STRS (HI) の HI を PEEK (8H 


8 の の) * 10 の 0 の 十 PEEK (&HZ80 


1 ) に か える 。 
F 1 キー を 押す と ハイ スコ ア が フリ ア さ れ 
ます 。 (広島 県 ・ 吉 岡 敏明 ・14 歳 ) 


@ な っ な ん と ご れ も 作 者 か ら の チェ ッ ク ボ イ 


ント で す 。 それ に し て も 勉強 の あと が うか が 
、( ツ ー) 


っ = 


の 7 


青森 県 ・ 問 上 ら ぼ こ つて も 凝 つ だ 作品 だ ね 。 こ の 』 
絵 を 書く の に 、 ど れこ らい 時 間 が みか つた の カ な あ 。 と 和 


選 み かぐ く 、 サ こい で の 人 で 


けん いち 文 き み は 、 テ 

ポリ で も 常連 だ し 、 ロ グラ ム オ 
シ エ ツ ト で も 、 常 連 に な りつ つ あ る ね / 

ー の りつ ぱ ば 。 み ん な も カレ に 続く 常連 に な ろう / 文 


ん 


キミ の 作 つ だ ブロ グラ ム 募 集 / 


ゲー ム に 限ら ず 、 実 用 プロ グラ ハム や い だ ず 
ら プ ログ ラム な ど 、 オ リ ジ ナ ル で 楽し い プ ロ 
グラ ム な ら な ん で も 結構 で す 。 部 門 は 次 の 4 
つが あり ます 。 

@ 1 画面 プロ グラ ム 部 門 一 その 機種 の 1 画 
面 の 表示 限界 内 に 入り きる プロ グラ ム (例え 
ば 、PC-8801 な ら 80 文 字 X25 行 まで )。 

@ ハ ー フ ブロ グラ ん ム 部 門 一 一 新設 部 門 で す 。 

長 さ は 1 画面 以上 か ら 50 行 以内 まで 。 短い プ 
ログ ラム を 作り だ いけ ど 1 画面 に は な か な か 
入り きれ な い …… と 悩ん めで る 人 に お すす めし 
ます 

@ シ ョ ー ト プロ グラ ん ム 部 門 一 一 原則 と し て 100 
行 以 内 の プロ グラ ム 。 内 容 に よ つ て は 多少 の 
オー バー (20 行 くら い ) は 認め る こと が あり の 
ます 。 な お 、 マ シン 語 の 場合 は は に K バ イト を 
めど と し ます 。 

@ 本 格 プ ログ ラム ハー 一 長 さ は 問い ませ ん 。 と 
に か こぐ 、 編 集 部 を 「 お つ 」 と いわ せる よう な 
力 の ある も の を 望み ます 。 


(投稿 フォ ー マ ツ ト ) 
圏 オ リ ジ ナ ル に 限る ーー 盗作 は も ちろ ん 絶 
対 だ め | 秘 植 の 場合 も 単なる 移植 で は 不可 。 
較 一 重 投稿 厳禁 一 同じ プロ ブラ ム を 他 誌 
に も 同時 に 送る の も 困り ます 。 盗作 に 次 ご 大 
問題 に な つて し まい ます 。 

較 パ ッ ク ア ッ プ を 必ず ! 一 投稿 作品 は お 
返し で きま せん 。 ま た 、 採 用 作品 に つい て は 後 
ほど 電話 な ど で お 聞き する こと が あり ます の 
C 届 ザ ブヒ グラ ム バハ の パッ プア ツ ププ (プー ブ や 
リス ト な ど ) を と つて お いて くべ だ さい 。 


圏 テー ブ 投 稿 一 一 尺 ず カセ ツ ト テ ー プ に セ 
ー プ ブ し て 送 つ て くだ さい 。④ 尿 ず べ ベリファイ 
する こと @ 意 の ため 回 以上 同じ も の を セ 
ー プ し て お ぐ く こ と ③ フ ァイル 名 と 機種 名 、 
プロ グラ ム 名 を テー プ の ラベ ル に 正確 に 記入 
し て お く こ と 。 

一 手紙 を 同封 一 一 テー プ と いつ し よ に の 
こ ご と を 書い だ 手紙 も 送っ つて くだ さい 。 朝 キミ 
の 住所 ・ 名 前 ・ 職 業 ・ 年 齢 ・ 電 話 番 写 @ プ 
ログ ラム の を 作 つ だ た 機種 名 と 使用 言語 (機種 に 
よ つ て は 増設 オプ ショ ン や モー ド な ども 正確 
に ) ロー ド ば 方 式 を 明記 (フラ イル ネーム 
や 、 ロ ー ド 命令 セー プ じ た を レ コー ダー の 機種 
名 、 ポ ー レ ー ト ) ⑳ プ ログ ラム の 名 前 、 遊 び 
方 ・ 使 い 方 を な る べ ご 詳し く 。 ゲ ー ム スト ー リ 
ー な ども 、 あ れ ば 付け 加え て くだ さい 。 な お 
アド ベン チャ ー ゲ ー ム な ど は 答え も いつ し よ 
に 。 人 ぴ 変 数 リス ト 、 プ ログ ラム 解説 参考 
文献 、 参 考 作品 を 明記 (プロ グラ ム を 作る と 
き に 参考 に し た 本 ・ 雑 誌 の 年 お よび 月 号 、 掲 
載 ベ バージ 、 プ ログ ラム 宮 な ど ) 

田 封 筒 に 書い て お く 〈 く こと が ら -ー 一 ④ 表 に 
は 、 遍 募 す る 部 門 を 赤 で 明記 ② 宮 に は 機種 
名 と ロー ド 訪 式 を 書い て ぐだ さい 。 


(あて 先 は ) 


〒101 東京 都 干 代田 区 神田 錦町 3 一 22 
小笠 原 ビ ル テ フ ノ ポリ ス 編 集 室内 
| に つ 2o ク 2 | 
ハー フ プ ログ ラム 
シヨ ョ ヨー ト プ ロ グラ ム 

本 格 プ ログ ラム 


ポ シ エ ッ ツ ト 


Vol.5 P23 バ グ 用 修正 リス ト 


29 D$= "DB79F53EE4D379F3CD1989FBF1D379C92A48E4ED5B4AE496199E32DD69DD44ESDSD3SC7E1 
2AF77D35D7E12AF77D35E7E12AF77231319EAD35FD1E1C591509999EB99EBC1 9D20D6Kk3 "KEFOR 1=9 


TO 71:POKE I+&HE499,VAL("8&H"+MID$(D$, TI*2+1.2) ):NEXT 


2 


本 当 に ご めん な さい (あや まる し か ほ 
か に する こと が な い )。 こ の No.1 こそ 、 バ 
グ 0 を 目指 す ぞ . ノ ( 

参 P13 PC6001 プ 660 1 に は “7 に REM 文 
の 意味 が な い の で 、 チ ェ ッ クサ ムリ スト 
10--30 行 の 頭 の "を 「REM」 に 変え て く 
だ さい 。 

参 P23 欄外 の リス ト は PC-8801 用 で - す 。 
僅 P25 ①260、500、790、880 行 の PRINT" 


ピピ 


ポン ソー 


- の あと の キャ ラク タ は 、 全 部 「」 で す 。 


②920 行 の PRINT" の あと の キャ ラク タ 
は 、 全 部 「 参 」 で す 。 

人 き P23 SWEET88 以 外 の DISK BASIC 
で は エラ ー が 出 て し まい ます (ROM 内 
ASIC や SWEET88 な ら 可 )。 10 行 の &HB 
EFF を &+E3FF に 、&HBFA0 を &HE448 
に 、 ま た 30 行 の 中 程 @HBF00 を &HE400 
に 、 ま た 60 行 の &HBF10 を &FEE418 に 、& 
HEBF12 を &+E41A に 変え 、20 行 を 下 の リ 
スト と さ し か え て くだ さい >。 

@P27 ①270 行 の PRINT" の あと キャ ラク 
タ と 、1050 行 の PRINT 文 中 の 「 」 に は さ 
まれ て いる キャ ラク タ は 、「 夫 」 で す 。 
②899、499 行 の REM 文 中 の *※ ネ ネ * ネ 
の あと の キャ ラク タ は 、「 〇 」 で す 。 
3③920、1020 行 の PRINT 文中 の キャ ラク 
タ は 、 全 部 「 参 」 て です 。 

(4 100 行 の PRINT 文 中 ご と 〕 お よび [と ご 
の あい だ に ーー を それ ぞ で れい れ て く 
だ さい 。 


、 葵 P39 13 行 目 、 セ ー プ する 際 の 、 終 了 


番地 の 表示 が まち が っ て いま し た 。 

D2FFF を D2FF に し て くだ さい >。 
佑 P40 リス ト 中 に 次 の 1 行 を 加え て く 
だ さい 。95 CLEAR &HICFFF 
珍 P46 使用 キー に 関す る 説明 が まち が 
つて いま し た 。 左 移動 用 の キー は 「 : 」、 
右 移動 用 の キー は 「 ]」 で す 。 
代 P58 リス ト の 最終 行 が 選 け て まし た 。 
次 の 行 を いれ て くだ さい 。 880 IF INKE 
Y$ も =" "THEN 880 ELSE RETURN 
76 690 行 は REM 文 で す 。 頭 に 「"」 
を つけ て くだ さい 。 
議 つ 、 追 伸 ! 

Vol.2、Vol.4 で も 新た な バク 発見 。 すみ 
ませ ん で す の ビ じゃ 。 
ポシェ ッ ト Vol.2 
人 P53 31 行 の PRINT 文 の 最後 の と ころ 
に ある キャ ラク タ は 「<」 で す 。 
ポシェ ッ ト Vol.4 
代 P69 ① わ 310 行 右 は じ (2) の あと に 「M」 
を いれ て くだ さい 。 ②820 行 右 は じ F2 ニ = 
4: の あと に [し ^) を いれ て くだ さい 。 


7/ 
が 


ボ ポシェット 式 賞金 ラン ク 


プラ ムシ ステ ム と は 


1 グラ ムー100 グ ラム まで の 100 段 階 
評価 。 賞 金 は 1 グラ ム に つき 300 円 。 最 
高 だ と 300 円 X100 グ ラム = 3 万 円 と な 
り ま す 。 平均 的 に は 50 グ ラム (1 万 5 
千 円 ) 前 後 。 

1 回 ご と に グラ ム 数 に 応じ た 賞金 を 
る し あげ ます が 、"84 年 V o 1.5 か ら '85 


年 No.2 まで の 通算 グラ ム 数 が 70 グ ラム 
に 達する は グラ ム 大 臣 に 任命 され 、 
任命 書 と 記念 品 を 差し あげ ます (前 回 
大 臣 ! すま も うち ょ い 、 待 っ て 
で 衝 /)。 ' 

そし て グラ ム 大 臣 の な か か ら 、 ポ シ 
ェ ッ ト 編 集 部 の 厳正 な 審査 に より 1 人 


を 選び 出し 、 グ ラム 総理 大 臣 と し て 永 
久 に その 名 准 を た た え 、 副 賞 と し て 本 
人 の 希望 する 10 万 円 相当 の パソ ュ ン 関 
連 商品 ( ツ ソフト で も ハー ド で も 自由 に 
遷 ん で い だ だ きま す 。 た だ し 定価 で ) 
を 差し あげ ます 。 

ょ っ て 、 み ん な が ん ば ろう / 


之 月 の グラ ム 


員 本 浩 (P6) 顔 が お も し ろ い の で 50 プ ラム 
衣 ブ プー さ ん (P /) ア イデ ア が 楽し い 60 プ ラ 
ム DRAGON(P8) 単 に 60 ブ ラム で 
ふ 大 先生 (P9) わ び ・ さ び を 買 つ て 100 プ ラ 
ム と いき だ いと ころ だ けど 、 な に し ろ 大 先生 
だ も ん ね 。 200 グ ラム 級 で な こつ ちゃ 。 で 、 
が こる ぐ 、50 グ ラム 女 河 崎 誠 一 (P10)PC 
-6001 系 の 画面 に は 他 機 種 の 半分 し か 入ら な い 
の に よ ぐ や つた だ ね 。 大 先生 と 同じ <50 プ ラム 
災 WATABOUCP11 と P32) ど 本 採用 。 ま 
と め て 70 プ ラム 娘 川 品 友 奈 (P12) イ ラス ト 
す つ ご ぐ が わい 一 な 一 | で も ほん と は 男 の 
セ に 1! エイ キチ の 貝 を 乱 し た 六 で 40 グ ラ 
ム 支 藤 田 康二 (P13)M5 派 の フー が 推薦 す 
る 60 プ ラム 丸 あ だ る (P14) う まぐ まとめ だ 
つ ち ゃ 。 50 ゾ ラム 監 福 田 直 人 (P15) も う ひ 
と つ 、 プ ラス アル ファ が ほし か つた だ 。 30 プ ラ 
ム 南 木 徹 ( ビ 16) ゲ ー ム 性 と し て は 30 グ ラ 
ム ガ な 。 で も プラ フィ ックス で が ん ば つた だ か 
ら 40 プ ラム 席 大 角 険 (P1/) モ プラ だ だ きつ 
て 他 に も 多い ん だ けど 新 要素 が あつ だ の で 採 
用 し た 。 30 グ ラム MAXCP16) マイ ナー 
な 機種 、 単 調 な 画面 、 こ ろ こ ろ 変 える ペン ネ 
ー ム の ご 重 若 を 乗り こえ だ 、 し ぶ ぷ い 35 グ ラム 
石原 誠 吾 (P19・ 流 削 ) ギ リ ギ リ で 採用 。 で も 
キヤ フ ノ ダ は と ぼけ て いて いい ね 。 20 十 20 に 、 
流 削 の ゲス ト 料 10 プ ラム 追加 し て 、50 プ ラム 
衣 清 水 晴 痛 (P26) 掲 載 し て いる プロ グラ ム は 
パー ベ キ だ けど 、 ち よ つ と こち ら で い ろ い ろ 
ま 直 し し だ の だ 。 リ スト も ちよ つと 長い ガ な 。 
00 プ ラム か ら 減 点 20 で 、40 プ ラム で ご めん 
廊 花 旦 誠 ( ビ 2/) プ ラフ ィ ッ フ を も うち よっ つと 
どう に か し て ほし か つ だ な 。 30 ブ ラム 補 
田 英俊 (26) す ご く ぐ よ ぐま と まつ て る 。 で も 
あま り に も 長い 。 うー ん 、90- 10 の 80 プ ラム 


で どう だ 娘 ご じ ら (P29) よ く で き て いる け 
ど 、 ル ー レ ツ ト は あり ふれ て る ね 。 40 グ ラム 
文生 松 津 抽 二 (P30) 前 略 、 重 松 様 、 娘 さん は 
お 元気 で す ガ 。 草々 。 で も 、40 プ ラム ハム です 。 

文則 本 泰久 (P31) 表 示 上 の バグ を 直す の に ず 
いぶ ん 苦労 し た 。 ゲ ー ム その も の も よ ぐ で き 
て る けど あり ふれ て る ね 。 30 グ ラム 女 0064 
/(P33) キ ヤラ クダ は いい けど 、 動 きま が ちよ つ 
と ……。 40 プ ラム VOU く ん (P34) よ くま 
と まつ て いる し 、 ア イデ ア も いい 。 60 グ ラム 
熊 沢 将 人 (P35) ア イデ ア や 雰囲気 作り も い 
いけ れ ど 、 キ ー 入 力 が ちよ っ と 不 親切 。 50 一 
10 で 40 プ ラム バ ー ド ン (P36) す ご く よ く 
で き て る 。 けど 長い 。 リー10C60 グ ラム 
中 年 が ツイ コン に 狂う て な ん で あか ん ね ん の 
お つ さ ん (P37/) ゲ ー ム その も の は よく ある の 
に 和牛 の キヤ フタ が 最高 。 お じ さ ん だ と いう 
点 も 加味 し て 、 し ぷ ぶ い 35 プ ラム 。 娘 パ ンプ 
(P38) ゲ ー ム は 立派 | 長 さも 適度 | これ 
な ら 100 グ ラム 級 。 で も 、 今 度 も や つ ぱ り 切 
り に お ぐれ だ か ら -ー101 の マイ ナス 1 プラ ハム だ 。 
これ で と 回 連続 載 つ た の に 通算 0 プラ ム 。 珍 し 
い ヤ ツ だ 支 宮 後 椅 考 (P39) ひ ええ 、 厚生 大 
外さ ま 。 今回 の クイ デア は グン バツ で ご ざい 
まし た 。 70 プ ラム で ご ざい ます 支 堀 沢 栄 (P 
40) う て ん 、 前 作 と 雰囲気 が 似 て いる し ね 。 工 
レー タダ 610 グラ ム ブ ラズ し て 40 グ ラム タ 
桑田 佳祐 (P41) こ ら つ 、 勝 考 に 人 の 名 前 を か 
だ る ん じゃ な い | で も ゲー ム は キャ ラク 
が か わい いつ | 60 グ ラム 娘 佐藤 昌樹 (P4 の ) 
グラ フィ ックス は いい けど 、 ゲ ー ム に メリ ハ 
リガ 不足 し て いる 。 新 大 臣 に は キ ピ し く 、 30 
グラ ム * 田 天 由 紀 (P43) 何 べ ん や つて も 上 
達し は いよ ー、 こ の ゲー ム 。 グ ー は お も し ろ 
いと いつ て だ けど ご 、 こぐ や し いか ら 50 プ ラム 


廊 NAGA(P44) リ ロー プ の アイ デア が いい 。50 
グラ ム 財 相 (P45) 先 生 (本 当 に 学校 の 
先生 な の )、 が ん ば つて 。 40 プ ラム メ NIkiDi 
Kin(P46)PV-2000 ユー ザー に は あり が だ たい 
プロ グラ ム 。 投 術 的 に も し つか り し て いる し 、 
ず お も し ろ い 。 70 グ ラム 支 高 橋 避 (P4/)M5 
で も 常連 の 高橋 ぐん 。 新 分 野 に 進出 で 、 期 待 
の 50 プ ラム 支 林 足 紀 (P46) う ー ん 、 最 近 P 
B の レベ ル が 高い な あ 。 70 ブ ラム 丸 高 井 直 
人 (P49) ス トー リー 設定 は いい けど 、 レベ ル 
の 高い PB の な か ひで は も う ひ と つ 。40 グ ラム 

左 長 州 力 (P50) ま た 、 人 の 名 を か だ る 子 が い 
だ | で も よ ぐ で き て る ね 。 60 グ ラム メル 
ンド (Pb51) も つと 工夫 が ぼ ほし か つた だ 。 30 グ ラ 
ム 畜 堀 川 洗 避 (P52) ノ クー が つけ だ いろ ん な 
注文 を きい て 改良 し て くれ だ の で 70 プ ラム 

夏秋 元 和 引 (P54) オ ー ソ ドッ クス に まとめ て 
ある 。 50 ゾ ラム (以上 ) 


@ プラム 大臣 情報 

VO 5 で 大 臣 に な つ だ れい 子 ち ゃ ん は 、 他 
の DISK BASIK へ の 配慮 不足 で 20 プ ラム 減 
の 大 臣 沙 ちあ 。 ま だ は いあ が つて き て ね ー ! 

愛 回 で 新 大 臣 こなつ だ / 人 を 含め て 、 た だ 
有 ラ 大 臣 12 名 。 新 大 臣 か ら 紹 介する と 、WAT 
ABOU 農 業 大 臣 、 柳 田 英俊 宇宙 大 臣 (通算 13 
0 グラ ム ! )、 堀 沢 栄 エレ ベー 大 臣 (通算 90 
グ ブラム)、 佐 藤 昌 樹 航空 大 臣 (通算 60 プラ ム )、 
NIKIDIKIr 区 部 大 臣 ( れ い 子 ちゃ ん の 後任 )、 林 
中 弘 格 闘技 大 臣 、 堀 川 浩司 通産 大 臣 。 すでに 
ジ 期 を 骨 え だ 大 臣 は 、KINTA 防 衛 大 臣 、 宮 
後 泰 孝 厚 生 大 臣 ( こ れ で 140 プ ラム )、 曳 夢 ヒ ラ 
大 臣 、 田 寮 由紀 スポ ー ツ 大 臣 、 小 島 聖 宗 教 大 
臣 。 以 上 。 辞令 の ほう は 今 し ば ら ぐ お 待ち を 
| (ホン マ に 仕事 が の ろう て スン マ ヘ ツン ) 


クツ 


バッ ク ナ ン バー ニ ご 錠 望 の 方 は 、 お 近く 
の 書店 で ご 注文 くだ さい 。 ま た 、 直 接 注 
文 の 場合 は 号 数 を 書い て 、 本 代 十 送料 (2 
50 円 、1 冊 増 える ご と に 50 円 増し ) を 現 
金 書留 か 郵便 振込 (東京 4-44392) で 、 下 
SB や 選 洲 委 く だ さい 。 
|05 東京 都 港 区 新橋 4- 10-1 
徳間 書店 特販 部 
公 03-433-6231 


5 ん ッッ ル 5 ング / 


\ー の お 知ら せ 


* 半 
9o 


< 二 璧 > 


< 出 居 > 


C. ビ に 〇 <ー< HN 


ー. ビ の ご <ー< HN 
HH つ QOOO) 


電 〇 OO 


久 計 機種 用 シヨ ー ト プロ グラ 
ム 35 本 氏 RUNRUN 党首 散 室 
人 @ 動 こ C.G. つ い に 登 場 ! 


@ 計 機種 用 プロ グラ ム 台 計 
45 本 欠 親 切 も くじ と 作者 の 
横顔 つき 急 RUN RUN 


@ 宮 機種 用 シ ヨー ト ・1 画 
面 プ ログ ラム 468 本 満載 介添 
削 コ ー ナ ー(FM-/) 


< 出 療 > 
< 出 療 > 


. ビ の < マー SH 違 


ビーOmO の XX の る OOT 
昌 〇 0OQ 


昌 〇 の の 


@ 機 種 用 親切 解説 付 44 本 
お も し ろ プ ログ ラム 刈 FIM- 
/、1 画 面 RUNRUN 沖 


@42 本 の お も し ろ プ ログ ラム 
@ 添 作 教室 PC-8001 系 マシ ン 
語 で ブ グレード アッ プ / 


MSX 用 旬 お も し ろ プ ログ 
ラム 全 25 本 但 ビ ギ ナ ー ズ マ 
ニュ アル 急 生 マシ ン ガ イド 


し て し まう の は 、A 型 の 性 格 な の か な あ 。 

も 、 私 の 体 に 1 わ 4.3 の BB の ひ と いて い 

令 も 、 せ 型 だ っ て 12 分 の 1 くら い は 天 っ てい 

る し 、MM 型 も N 型 も ね 、RH マ イナ ス だ っ て 何 

お ので る そそ よー する に ミッ クス フレ シッ 

ド じ ゃ 。 (あっ ちゃ ん ) 
最近 新婚 の ボク は 、 夜 な 夜 な 家 を 抜け 出す の に 編集 
部 か ら の 暗号 電話 「PC-8001 の バグ or6001 の バグ 」 と い 
う 言葉 に 、 六 本 本 ある い は 新宿 の 酒場 へ と タク シー を 


な ん だ ガ 知 ら な いけ ご ど 、 


テク ノ ポ リス ムッ ク 


プログラム ポシェ ッ ト 95NO。1 


、 倫 発行 人 山下 辰巳 
@ 配 集 人 佐瀬 伸 治 


応 募 シ ー ル 
ボ 1 


- と 書い て あっ た :- 


クノ ポリ ス て お 仕事 ば か り 


デ テン ン ボ リス ムン に な つた だ 
ラ 年 の ポ シ エ ント です 。 


江 こ の 年 末年 始 に 石打 ヘス キー を する た め に 行っ た ん 
だ : で も 、 人 と ぶつ か っ て 、 頭 を 4 針 縫 っ た の | もち 
ろ ん 頭 を 縫う 3 に は 生え て いる 胃 が じゃ まだ か ら 傷 日 の 
まわ り の 敵 を 切っ ちゃ う の 。 で 、1 月 15 日 の 成人 式 で 
は 晴れ 着 が バァ に な り ま し た . ちな み に 私 は 1 人 っ 娘 
で す 。 お と 一 さん 、 お か 一 さん 、 ご めん ね 。 

( 紋 を 縫っ て も まだ 疑 り ず に スキ ー が し た い 炒 み ) 
形 こ の 所 に 、 フ ログ ラム ボボ シェット が 産声 を 上 け て か 
ら 、 告 くも 1 年 、 め で た く 満 1 歳 と な り ま し た (拍手 )。 

毎号 、 や れ 忙 し いと か な ん と か で 、 い ちば ん 迷惑 を 
か け 、 び ん し ゅ く 者 の 代名詞 と な っ て いま す が 、 今 回 
も 、 し っ か と お 正月 を 楽し ん じゃ いま し た 

と は いう も の の 、 日 頃 の 行い が よく な いた め に 部 屋 
の 中 は グ タチ ャ グチ ャ 。 つ いつ い 大 掃除 に 熱 が 入り 、 是 
が 明け て も 掃除 を し て し まっ た 。 お か げ で 今 で は 部 屋 
の 中 は 快適 だ けど 、 完 べき 主義 な の は 、A 型 の 性 格 な 
の か な あ 。P.S. 今 年 は じ め て 編集 部 に 来る と 、 ホ ワイ 
(ICHLT700 た US2TA2 は 2 あー し 

ーー (た けち ゃ ん ) 
% それ は 私 が 春 き まし た 。 私 は お 正月 も 何 も な く 、 テ 
の 0 6 Bon 仕事 ば か り 


@ 靖 集 担 当山 閑 油 
@ 痕 集 山科 教 之 


と は す の で あっ た (今夜 も また 、 ゆ あみ ちゃ ん と ター が 
8001 の バグ を 出し て くれ る っ ちゃ だ ね ハット サ く ん ) 
珍 今 回 の 添 章 教室 を 自分 で 読み 返し て いた ら 、 あ まり 
だ も えら そう な 交 琴 な の で ぴ びっ うく ぐ くり し て し まっ た: 私 
は 、 実 は と て も や さき さ し い 小心 者 の A 型 な の で ある そ 
ん た な に えら そう で は な いっ / それ に し て も 「 私 が 正 

し い コ ヨー ナー」 は 1 回 切り て 人 然 消 減 し て し まっ た 。 

だ っ て お 手紙 こない ん で すもも ん. いや 、2 通 ほど きた 
*、 中 身 は 全然 関係 の な いい ページ の バグ ク グ 発 見 だ っ た り 、 
ゆみ ちゃ ん 係 に ぶさ わし い 質 問 ば か り だ っ た (例え ば 、 
「 た けち ゃ ん は どー し て ひん し ゅ くも の だ っ て いわ れ 
る ん で すか ? 」 と か )。 今 回 は 確か に ユー ナー は な く な 
っ た が 、 私 は だ れ の 挑戦 で も 受け る (で NR) 
事 フ ッ フ プッ 、 ザ ・ け い ば 。」 の 芝 破 利 矢 く ん 。 キミ の 姿 


_ 作 は 予告 の 写真 を 見 た 賢明 な る 読者 数 人 に 見 破 ら れ た 


ぞ で 。、 も う 、 キ ミ と は 遊ん で や ん な い 。( 再 びあ っ ちゃ ん ) 

間 ほ ん と 一 に こん か い は あく む の よー な すけ じゅ ー る 
で し た 。 そ の た め に へ ん し ゅ うこ 一 き が ぜん ぜん か け 
ま べ ん 。 ( ら り ば っ ぱく ーー で 、、) 
ボン シェ ッ ト Vol.5 で は 不 完全 な リス ト を 掲載 し 、 多 く 
の 方 に 迷惑 を お か けし まし た 。 申し わけ あり ませ ん . 
お わび の し る し に 、 こ 項 望 の 方 に 、 私 の 脂 の の っ た お 
もい 肉 を 差 上 あけ ます 、 う そ て で て です: 《( エ イキ チ ) 
章 な ん だ お 一 / ぼく の 分 が た っ た 2 行 し か な いじ ゃ 
な いか 。 あ っ 、 も う 1 行 し か な い 。 にゃ お お (パン プ ) 


⑯ 表 抵 デ ザイ ン - 鈴木 俊明 。 
⑮ ネ メデ ザイ ンー バス スキ トシ アキ デザ イン オフ ィ ス 
@⑱ イ ラス ト 増田 秀美 ・ 金 子 や で す よ し ・ パ ンプ 


@ 写 真赤 原谷 


技術 本 多 裕 ・ 松 下 武 論 ・ 氷 吉 敏 男 ・ 渋 谷 隆 ・ 橋 岡 政和 
、 葵 フィ ニン シュ ・ デザイン ン ノ 
[ ァ 凸版 即 刷 机 。 
で 徳間 書店 1985 本 計 掲 載 の 写真 イ ラス ト 、 

の 押 載 を 禁じ ます . 


株 文 新 社 


記事 お よび ブロ グラ ム 


加 是 凍 還 還 是 車間 目 昌 | 全国 どこ で も 電話 ] 本 で / 川 昌 自国 還 | 間 昌 還 症 凍 呈 | 
上 ni 通信 下 取 販売 ・ 買 取 


2 な a 0 分 。。 マイ コン ワー ブ プ 周辺 機器 ツ フ ト 書 籍 な F ま とめ て 


N ー @ 6-9801 」 ルツ の 6( 記 77- モ エー ター 側 ) 
回 9801F2 新 同 入荷 パソ ピア (PA-700) 
PC-8801 96.000 JW- レ イア ウト 依 フ ルター 付 ナ フロ ) 
PC-8801MKII 綱 介 モテ ル 3) 1 立 ベー シッ クマ スタ ーL3MK5 
PC-8001M KII 1 MB- 1009600 ウ ナー ズ モ ーー セッ ト ) 
PC 〇 -68001 , ) 
PC 6601 


PC-6001MKII 
PC-6001 
P ご -PR-201( 新 同 ) 


中 解像度 モニ マー .000 ま | 三 , マル チ 8 
高 解像度 モニ マー .000 MAPDUS げ 9 用 ディ ス 2. 坦 抽 ) 
超 高 朋 像 (640 > 400) モ 三 タ ー ) 9 HOC-20 

上 -1100 


PV-2000 
(だ 200E( ブ ジリ ンタ 
SC-3000 
RX-/8 
MSX※ 


中 古 ソ フト 大 量 展示 ./ 


人 中古 マセ ン 本 体 辺 
機器 の リス ト が で きま し だ 


0 | 依 お 申し 込み の 方 は 60 円 切手 2 
2 枚 を 同封 の 上 、 当 社 中 古 マ イ 


レク コン リス ト 係 へ 御 請求 下さ い 、。 


@ 中 古 マ イコ ン 在 庫 300 台 ※ そ の 他 在 庫 は 、 豊 富 に ご ざい 
下 取 ・ 売 却 を お 急ぎ の 方 は 直接 現品 を 
宅急便 な ど で 下 記 へ お 送り 下さ い 。 


@ 下 取り ご 和希 望 の 場合 は 、 一 週間 以内 に 、 ご 和希 望 商品 と 下 取 分 代 
金 差し ら | き の 請求 書 を お 届け 致し ます 。 

@@ 売 却 ご 希望 の 場合 は 、 現 品 が 着き 次 第 、 3 日 以内 に 高価 買取 り 
代金 を お 届け 致し ます 。 

@ 下 取り ・ 売 電 ご ちら の 場合 も 周辺 機器 、 書籍 まで 至 て 高価 で お 
引取 り 致 し ます の で まとめ て お 送り 下さ い 。 


高 鉱 パソ コン デス ク 全 機種 対応 靖 CL て 上 計 | 強度 バツグン 移動 自由 や の 


ぷ ※ 谷 駅 前 店 に て 展示 中 / 
全国 配送 


災 パ ソコ ン デ スク の お 求め は 、 お 電話 JP ン ン ル 2 の 0 の 
か 、 住 所 ・ 氏 名 ・ 電 話 番号 と 御 購入 “ ー “ 
名 を 御 記 入 の 上 、 代 金 と いっ し ょ 
に 現金 書留 に て お 送り 下さ い 。 到 間 
後 、3 日 前 後に 商品 を お 届け 致し ます 。 600( 幅 ) 0 oo(Wg) 900( / ) 740( 席 行 


Ac あな だ の マイ コン を 下 取 し ます / 
旬 マ イコ ン の お 求め 、 下 取 、 売 却 は 今 すぐ お 電 語 て / 見 積 申 込 は お ハガキ で / : 


人 G03(463)4455 eo 


オモ テ っ ラ 


東 
称 2 京 
ーー トー モネ ィ ー て ealieip ネ ュ ホ ュ ラプ ォ プ オ ぼ げ ケー グ タグ ヨー ヨ トー ピトー 了 了 稼 才 ポ の 3 | の 肝 和 検 ( 新品 ・ 中 古 の 別 ) | 
宅 四 マ 2 谷 | の ーー ga 名 品番 
( ド セイ 大 区 | geW Rg 
に | まあ: 過 首 : 
則 日 サイ ゴ J 志 通 PB- 
〒150 東京 都 渋谷 区 道玄坂 2-3-2 大 外 ビ ル 合 03(463)4455 | My Sb 
| 見 積 お 申込 み の 思 | 新品 中 同書 入 、 下 取り ご 希望 の 万 は 、 こ の 見積 由 和書 に め 要 事 順 を ご 記入 の 上 、 お 送り 下さ い 。 ナ rTYHTGCG2 


“ほのぼの 人 怪獣" モ ピ ラ の 住む モ ピ ラン 
ド に 、“ 宇 宙 の キッ ド ネ イ パ ー" ラ ゾン が 
侵入 し た 。 ラ ゾン は 、 モ ピラ の 子供 で あ 
る コモ ピラ を 誘拐 し 魔 の 水 宮 に た て こも 
9 守 。 

か わい い コ モ ピ ラ 達 を 救う た め “正義 
の 勇者 "モビ ピ レンジャー が 、 カ ヌー に 乗 


う 込 み 水沼 に 同 か っ た 。 モビ レン ジャ ー 
ほ の ほ の 和沙 第 


_ モ ヒレ ソソ ヤー 


よー G+ すま の ロミ ー 〇 よう 1 〇 
| 


の 


モエ ーo 


に ゃ 3 ら ミー o る So RS エー っ 


』ー の つの と 選 ぞ 〇 HH テーQ り ひひ どる 〇 2 ラ すこ の ま 
ヨリ ベー 3 の に と と? どー 2 


マロ リー 〇 つの で 〇 ロミ ー 〇 の 〇 9 〇 RS エー ン 
選 わ Nu ご ー 1 つら の = っ (まき 5! コ テロ NE ・ 
5  】 間 細 症 了 陣 還 間 昌和 計 彰 也 語 


mmn 
下 5 Fm ロ 


Lo mm mm = ト - 間 還 cod 


還 邊 当り に 


ャ ロー 〇 る に ーO 一 ー 
5ON5248 き 9 "=923 な っ O BESk-OZ ouro2983o "tco 


P マ RfRIDー1 づ 3 P の US で 1 NG 


ニー ンー ディ 1 つう 
ニ ズ ペー ニワ ロニ 


プア ド ベン ナヤ ー ザ ゲー ム 


王家 の 谷 


3500 年 以上 も の 昔 。 エジプト 史上 最 
も 栄え た 新 王国 時 代 、 国 王 た ち は 豪華 
な 埋葬 品 の 盗 堀 を 防ぐ た め 人 里 は な れ 
た 山あい の 中 に 秘か に 墓 を 造っ た 。 以 
後 歴代 の 国王 や 貴族 が 次 々 と 同じ よう 
に 54 も の 墓 を つく り 、 や が て 王家 の 
谷 と し て 国王 た ちの 安眠 の 地 と な っ 
た 。 だ が 、 被 葬 者 た ちの 願い も む な し 
く 多 く の 墓 は 盗掘 され 、 大 部 分 が 廃虚 | 
と 化し た 。 し か し 秘か に 他 に 移さ れ た 
何人 か の 国王 の ミイ ラ は 、3000 年 以上 


続け こい た の で ある 。 
この 秘宝 珠 を 求め て 今 、 


し た 石室 の 謎 と 、 


YIE.AR.KUNG-FU 


引 の の 0 テニ コー ルリ し の ンー 


RC725 \4.800 


RC720 \4.800 


君 は コナ ミ の サー ブ が 受け られ / 詳 呈 


EE 


の 唯一 の 武器 は 、 ラ ゾン を 石 に 変え る こ 
ご の で きる スト ー ン ・ ビ ピー マー だ 。 
行け ん モビ ピレン ジャ ー/ コモ ビラ 達 を 救 


うた め 。 
行け ん の モ ピレン ジャ ー/ モビ ピラ ンド に 平 
和 な 楽園 を と り も ご ど せ 。 


名 け モビ レンジャー/ モビ ・ モ ビ / 


WU 由 隊 MA ll コ 


も の 時 の 流れ の 中 で 、 や が て は 神 の 国 
"太陽 "へ の 導き を 与え る 秘宝 珠 を 守り 


か つて 、 こ ん な リア ル な ゲー ム 


4 \ 和 4600 


S1 CO ロロ ーCOO51 OO に ST で 4 


h 
HHHIRHHI 


HHHHUUHUUUHIUUUU 


と KDD か 1 PY RI PDー 〇 づつ PRMUS : NG 


』 シ 


HHHHIHHHUUUHH 


| oo 


PY に RI Dー の マズ PausSr NG 


xings = 苦 =- 


マツ 只 到 IE ヤ 


KONORN1I 1 ヨ 馬 ち 


一 人 の 男 が 
王家 の 谷 へ 向っ た 。 イ ギリ ス ・ マ ンチ 
ェ スタ ー 生 れ の 冒険 家 ビ ッ ク で ある 。 
は た し て 彼 は 古代 エジプト 文明 を 結集 
ミイ ラ 男 た ちの 呪い 
を 解き 、 封 じ 込 め ら れ た 秘宝 珠 を 無事 
手 に 入れ る こと が で きる だ ろう か の 


王家 の 傘 
RC727 \4.800 


ce 4 ん の W の ^ ナ の 


@⑥190OS Konami 


較 通 信販 売 て で も お 求め て きま す 但 銀 行 振込 て こ 文 の 場合 下記 の 銀 
行 口座 へ 合計 金額 を 振込 ん 人 てく た さ い 

人 @ 電 全書 留 て こ 文 の 場合 … 仁 所 ・ 氏 振込 後 、 ハ カキ て 住所 ・ 氏 名 ・ 商 品名 

名 ・ 電 話 番号 ・ 商 品名 を は っ さり 書い を ニニ 連 紹 く た さ い 

て 、 商 品 価格 + (送料 \ 500) の 合計 人 金 < 振込 先 〉 コナ ミ 株式 会 社 ・ 皆 一 答 計 銀 

家 を お 送り く た さ い 。 市ヶ谷 支店 ・ 普 通 1073435 


onarmi 


る か 。 ス マッ シュ 、 ボ レー も 自在 及 較 が か あっ た だ ろう か 。 カンフー の 達 
だ 。 シ ング ルス も ダブ ルス も も ち 肛 人 "リー" は 悪党 共 の 城 「 メ ンマ 
ろ ん 、 ら 人 で コン ピュ ー タ こ 戦 う 』 の 塔 」 へ 乗り 込む が 、 行 く 手 に 立 SOFTWARE 
こと だ っ て 出来 る 。 ざわ めく 観衆 ち は だ か る すご 腕 達 に 苦戦 / 棒 術 、 


の 中 、 君 も いつ し か スタ ー ブ プレイ 


火 談 術 、 く さり 使い と 次 か ら 


コナ ミ 株 式 会 社 


次 に 。 


ヤー。 あ の マッ ケン ロー だ っ て 手 息 つ く 暇 も な い 。 は た し て リー は 、 東京 都 干 代田 区 九段 南 2 丁目 3-1】4 TEL 03-262-9111( 代 ) 
に 汗 に ぎっ て し まう だ ろう 。 さ あ 、 に や つら 友則 し 平和 友 且 お さる とき So は ライ クロ ント の 生生 
コー ト か が 君 を 待っ て いる / が 出来 る の だ ろう か 。 @ この 商品 は 、 弊 社 ( コ ナミ ) の 応 諾 な し に 海外 へ の 出荷 は で きま せん 
コー ニニ ミー ライ ーー レク ーー プ て 会 員 特 典 > = 2 クラ ブフ 内 ・ 外 部 て 開発 され た 優れ た マイ コン の ハー < ご 入会 手続 〉 @$ 事 務 局 大 阪 市 北 区 梅田 丁目 !!-4-1215* 
「 コナ ミ マ イコ ンク ラプ | 事務 局 で ノ フ トウ エア 開発 支援 装置 、 国 内 外 の ハー ド ・ ソ フト ウエ ア は 、 商 品 化す る こと か て きま す 隊 Ss ヨリ ジンク (ラン 名 ! 
シナ リ レ ヨ コンビ コロ に ニタ (2N ドッ ンジ ョ シン ョ ドリ クエ の 2 りき ョ 技 : 入 対 育 3 て コン に 関す る 半生 講演 会 に 優待 参加 て で てき ます @ 入 会 金 1.000 幅 (大 阪 駅 前 第 4 ヒル |706 号 ) 1 


5 
し 会 員 募 集中 に 全 用 する こと か で きま す 。 4 全員 績 、 ハ ッ シ を 伺い た 


。RM 陸 


CHICAGO (U.S.A) FRANKFURT (W.Germany) 


TEL312-364-6633 FAX312-364-1368 


LONDON (U. に K.) 
TEL 01-429-2446 FAX01-429-2069 


〇 人 徳間 書店 1985 E 屈 ! 


TEL069-5076168 FAX069-5076160 


凸版 E 屈 | 


@ 年 会 費 2.400 円 (月 200 円 ) 


会 06-345-2456 担当 7 松 二 
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〇 OSA に へ (Japan) 
TEL06-345-2456 FAX06-345-2466. 


TOKYO (Japan) 
TEL03-262-9111 FAX03-261-6211 


全 二 
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